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Preface 



This manual is the first in a series of two volumes. The reference 
information contained in these two manuals is provided as a DOS/VS 
serviceability aid and is, therefore, a summary of other DOS/VS 
documentation. These manuals are intended for use by persons 
involved in program support. 

This manual does not contain information on Advanced Functions 
DOS/VS. This information represent licensed material and must be 
ordered separatly. 

It will be distributed as System Library Supplement which logically 
fit into this manual. 

The two volumes contain the following information: 

- Volume 1,SY33-8571: 

Chapter I : System/370 General Information 

II : DOS/VS General Information 

HI: DOS/VS IOCS (General, SAM, DAM, ISAM) 

IV: DOS/VS Supervisor Control Blocks and Areas 

V: DOS/VS Service Aids 

- Volume 2, SY33-8572: 
Chapter I : POWER/VS 

II : VTAM Control Blocks 

III: VSAM Control Blocks 

IV: Model 20 Emulator 

V : 14xx Emulator 

VI: BTAM 

If there is any discrepancy between the information contained in 
this manual and the DOS/VS optional programming material 
(e.g., PLMs and listings), the latter is assumed to be correct. 

Seven Edition (July, 1977) 

This is a major revision of, and obsoletes,"SY33-8571-5. It 
applies to Version 6, Release 34, of the IBM Disk Operating 
System/Virtual Storage, DOS/VS, and to all subsequent versions 
and releases until otherwise indicated in new editions or Technical 
Newsletters. Changes are continually made to the information 
herein; before using this publication in connection with the 
operation of IBM systems, consult the latest System/370 Bibliography, 
GC20-0001, for the editions that are applicable and current. 

Requests for copies of IBM publications should be made to your 
IBM representative or to the IBM branch office serving your locality. 

A handbook-sized binder, FE Part Number 453559, may be 
purchased from IBM. Customers may order it through their IBM 
marketing representative. IBM personnel should order it as an 
FE part from Mechanicsburg. 

This manual has been prepared by WT-DP/CE Technical Operations, 
Poststrafie 40, 7030 Boeblingen, Germany. 

A form for readers' comments is provided at the back of this 
publication. If the form has been removed, comments may be sent 
to the above address. Comments become the property of IBM. 

© Copyright International Business Machines Corporation, 1973, 1974, 1975, 1976, 1977 
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CHAPTER I 

SYSTEM 370 GENERAL INFORMATION 



MACHINE INSTRUCTIONS 



Name 


Mne- 


CoJe 


Format 


Operands 


Add (c) 


AR 


1A 


RR 


R1,R2 


Add (c) 


A 


5A 


RX 


R1,D2(X2,B2) 


Add Decimal (c) 


AP 


FA 


SS 


D1(L1,B1),D2(L2,B2) 


Add Halfword (c) 


AH 


4A 


RX 


R1,D2(X2,B2) 


Add Logical (c) 


ALR 


IE 


RR 


R1,R2 


Add Logical (c) 


AL 


5E 


RX 


R1,D2(X2,B2) 


AND (c) 


NR 


14 


RR 


R1,R2 


AND (c) 


N 


54 


RX 


R1,D2(X2,B2) 


AND (c) 


Nl 


94 


SI 


D1(B1),12 


AND (c) 


NC 


D4 


SS 


D1(L,B1),D2(B2) 


Branch and Link 


BALR 


05 


RR 


R1,R2 


Branch and Link 


BAL 


45 


RX 


R1,D2(X2,B2) 


Branch on Condition 


BCR 


07 


RR 


M1,R2 


Branch on Condition 


BC 


47 


RX 


M1,D2(X2,B2) 


Branch on Count 


BCTR 


06 


RR 


R1,R2 


Branch on Count 


BCT 


46 


RX 


R1,D2(X2,B2) 


Branch on Index High 


BXH 


86 


RS 


R1,R3,D2(B2) 


Branch on Index Low or Equal 


BXLE 


87 


RS 


R1,R3,D2(B2) 


Clear I/O 


CLRIO 


9D01 


S 


D2(B2) 


Compare (c) 


CR 


19 


RR 


R1,R2 


Compare (c) 


C 


59 


RX 


R1,D2(X2,B2) 


Compare and Swap 


CS 


BA 


RS 


R1,R3,D2,(B2) 


Compare Decimal (c) 


CP 


F9 


SS 


D1(L1,B1),D2(L2,B2) 


Compare Double and Swap 


CDS 


BB 


RS 


R1,R3,D2,(B2) 


Compare (c) 


CR 


19 


RR 


R1,R2 


Compare (c) 


C 


59 


RX 


R1,D2(X2,B2) 


Compare Decimal (c) 


CP 


F9 


SS 


D1(L1,B1),D2(L2,B2) 


Compare Halfword (c) 


CH 


49 


RX 


R1,D2(X2,B2) 


Compare Logical (c) 


CLR 


15 


RR 


R1,R2 


Compare Logical (c) 


CL 


55 


RX 


R1,D2(X2,B2) 


Compare Logical (c) 


CLC 


D5 


SS 


D1,(L,B1),D2(B2) 


Compare Logical (c) 


CLI 


95 


SI 


D1(B1),I2 


Compare Logical Characters 


CLM 


BD 


RS 


R1,M3,D2(B2) 


under Mask (c) 










Compare Logical Long (c) 


CLCL 


OF 


RR 


R1,R2 


Convert to Binary 


CVB 


4F 


RX 


R1,D2(X2,B2) 


Convert to Decimal 


CVD 


4E 


RX 


R1,D2(X2,B2) 


Diagnose (p) 




83 


SI 




Divide 


DR 


ID 


RR 


R1,R2 


Divide 


D 


5D 


RX 


R1,D2(X2,B2) 


Divide Decimal 


DP 


FD 


SS 


D1(L1,B1),D2(L2,B2) 


Edit (c) 


ED 


DE 


SS 


D1(L,B1),D2(B2) 


Edit and Mark (c) 


EDMK 


DF 


SS 


D1(L,B1),D2(B2) 


Exclusive OR (c) 


XR 


17 


RR 


R1,R2 


Exclusive OR (c) 


X 


57 


RX 


R1,D2(X2,B2) 


Exclusive OR (c) 


XI 


97 


SI 


D1(B1),I2 


Exclusive OR (c) 


XC 


D7 


SS 


D1(L,B1),D2(B2) 


Execute 


EX 


44 


RX 


R1,D2(X2,B2) 


Halt I/O (c,p) 


HIO 


9E00 


S 


Dl(BJ) 


Halt Device (c,p) 


HDV 


9E01 


S 


D1(B1) 


Insert Character 


IC 


43 


RX 


R1,D2(X2,B2) 


Insert Characters under Mask (c) 


ICM 


BF 


RS 


R1,M3,D2(B2) 


Insert Storage Key (p) 


ISK 


09 


RR 


R1,R2 


Load 


LR 


18 


RR 


R1,R2 


Load 


L 


58 


RX 


R1,D2(X2,B2) 


Load Address 


LA 


41 


RX 


R1,D2(X2,B2) 


Load and Test (c) 


LTR 


12 


RR 


R1,R2 


Load Complement (c) 


LCR 


13 


RR 


R1,R2 


Load Control (p) 


LCTL 


B7 


RS 


R1,R3,D2(B2) 


Load Halfword 


LH 


48 


RX 


R1,D2(X2,B2) 


Load Multiple 


LM 


98 


RS 


R1,R3,D2(B2) 


Load Negative (c) 


LNR 


11 


RR 


R1,R2 



MACHINE INSTRUCTIONS (....Cont'd) 



Name 


Mne- 
monic 


Code 


Format 


Operands 


Load Positive (c) 


LPR 


10 


RR 


R1,R2 


Load PSW(n,p) 


LPSW 


82 


SI 


D1(B1) 


Load Real Address (c,p) 


LRA 


Bl 


RX 


R1,D2(X2,B2) 


Monitor Call (m) 


MC 


AF 


SI 


D1(B1),I2 


Move 


MVI 


92 


SI 


D1(B1),I2 


Move 


MVC 


D2 


SS 


D1(L,B1),D2(B2) 


Move Long (c) 


MVCL 


OE 


RR 


R1,R2 


Move Numerics 


MVN 


Dl 


SS 


D1(L,B1),D2(B2) 


Move with Offset 


MVO 


Fl 


SS 


D1(L1,B1),D2(L2,B2) 


Move Zones 


MVZ 


D3 


SS 


D1(L,B1),D2(B2) 


Multiply 


MR 


1C 


RR 


R1,R2 


Multiply 


M 


5C 


RX 


R1,D2(X2,B2) 


Multiply Decimal 


MP 


FC 


SS 


D1(L1,B1),D2(L2,B2) 


Multiply Halfword 


MH 


4C 


RX 


R1,D2(X2,B2) 


OR(c) 


OR 


16 


RR 


R1,R2 


OR(c) 


O 


56 


RX 


R1,D2(X2,B2) 


OR(c) 


Ol 


96 


SI 


D1(B1),I2 


OR (c) 


OC 


D6 


SS 


D1(L,B1),D2(B2) 


Pack 


PACK 


F2 


SS 


D1(L1,B1),D2(L2,B2) 


Purge Table (p) 


PTLB 


B20D 


S 




Read Direct (a,p) 


RDD 


85 


SI 


D1(BI),I2 


Reset Reference Bit (c,p) 


RRB 


B213 


s 


D1(B1) 


Set Clock (c,p) 


SCK 


B204 


s 


D1(B1) 


Set Clock Comparator (p) 


SCKC 


B206 


s 


D1(B1) 


Set CPU Timer (p) 


SPT 


B208 


s 


D1(B1) 


Set Program Mask (n) 


SPM 


04 


RR 


Rl 


Set Storage Key (p) 


SSK 


08 


RR 


R1,R2 


Set System Mask (p) 


SSM 


80 


SI 


D1(B1) 


Shift and Round Decimal (c) 


SRP 


F0 


SS 


D1(L1,B1),D2(B2),I3 


Shift Left Double (c) 


SLDA 


8F 


RS 


R1,D2(B2) 


Shift Left Double Logical 


SLDL 


8D 


RS 


R1,D2(B2) 


Shift Left Single (c) 


SLA 


8B 


RS 


R1,D2(B2) 


Shift Left Single Logical 


SLL 


89 


RS 


R1,D2(B2) 


Shift Right Double (c) 


SRDA 


8E 


RS 


R1,D2(B2) 


Shift Right Double Logical 


SRDL 


8C 


RS 


R1,D2(B2) 


Shift Right Single (c) 


SRA 


8A 


RS 


R1,D2(B2) 


Shift Right Single Logical 


SRL 


88 


RS 


R1,D2(B2) 


Start I/O (c,p) 


SIO 


9C00 


S 


D1(B1) 


Start I/O Fast Release (c,p) 


SIOF 


9C01 


S 


D1(B1) 


Store 


ST 


50 


RX 


R1,D2(X2,B2) 


Store Channel ID (c,p) 


ST IDC 


B203 


S 


DI(B1) 


Store Character 


STC 


42 


RX 


R1,D2(X2,B2) 


Store Characters under Mask 


STCM 


BE 


RS 


RI,M3,D2(B2) 


Store Clock (c) 


STCK 


B205 


S 


D1(B1) 


Store Clock Comparator (p) 


STCKC 


B207 


S 


D1(B1) 


Store Control (p) 


STCTL 


B6 


RS 


R1,R3,D2(B2) 


Store CPU ID (p) 


STIDP 


B202 


S 


D1(B1) 


Store CPU Timer (p) 


STPT 


B209 


S 


D1(B1) 


Store Halfword 


STH 


40 


RX 


R1,D2(X2,B2) 


Store Multiple 


STM 


90 


RS 


R1,R3,D2(B2) 


Store then AND System Mask (p) STNSM 


AC 


SI 


D1(B1),I2 


Store then OR System Mask (p) 


STOSM 


AD 


SI 


D1(B1),I2 


Subtract (c) 


SR 


IB 


RR 


R1,R2 


Subtract (c) 


S 


5B 


RX 


R1,D2(X2,B2) 


Subtract Decimal (c) 


SP 


FB 


SS 


D1(L1,B1) / D2(L2,B2) 


Subtract Halfword (c) 


SH 


4B 


RX 


R1,D2(X2,B2) 


Subtract Logical (c) 


SLR 


IF 


RR 


R1,R2 


Subtract Logical (c) 


SL 


5F 


RX 


R1,D2(X2,B2) 


Supervisor Call 


SVC 


0A 


RR 


1 


Test and Set (c) 


TS 


93 


SI 


D1(B1) 



Mne- 

TCH 
TIO 
TM 
TR 



UNPK 
WRD 



MACHINE INSTRUCTIONS (. . . .Cont'd) 



Name 

Test Channel (c,p) 

Test I/O (c,p) 

Test under Mask (c) 

Translate 

Translate and Test (c) 

Unpack 

Write Direct (a,p) 

Zero and Add Decimal (c) 

Floating Point Instructions 

Add Normalized, Extended (c,x) 

Add Normalized, Long (c) 

Add Normalized, Long (c) 

Add Normalized, Short (c) 

Add Normalized, Short (c) 

Add Unnormalized,Long (c) 

Add Unnormalized,Long (c) 

Add Unnormalized, Short (c) 

Add Unnormalized, Short (c) 

Compare, Long (c) 

Compare, Long (c) 

Compare, Short (c) 

Compare, Short (c) 

Divide, Long 

Divide, Long 

Divide, Short 

Divide, Short 

Halve, Long 

Halve, Short 

Load and Test, Long (c) 

Load and Test, Short (c) 

Load Complement, Long (c) 

Load Complement, Short (c) 

Load, Long 

Load, Long 

Load Negative, Long (c) 

Load Negative, Short (c) 

Load Positive, Long (c) 

Load Positive, Short (c) 

Load Rounded, Extended to Long^x 

Load Rounded, Long to Short (x) 

Load, Short 

Load, Short 

Multiply, Extended (x) 

Multiply, Long 

Multiply, Long 

Multiply, Long/Extended (x) 

Multiply, Long/Extended (x) 

Multiply, Short 

Multiply, Short 

Store, Long 

Store, Short 

Subtract Normalized,Ext'd (c,x) 

Subtract Normalized, Long (c) 

Subtract Normalized, Long (c) 



Op 
Code 


Format 


Operands 


9F 


SI 


D1(B1) 


9D 


SI 


D1(B1) 


91 


SI 


D1(B1),I2 


DC 


SS 


D1(L,B1),D2(B2) 


DD 


SS 


D1(L,B1),D2(B2) 


F3 


SS 


D1(L1,B1),D2(L2,B2) 


84 


SI 


D1(B1),I2 



SS D1(L1,B1),D2(L2,B2) 



Mne- 
monic 


<& 


Format 


Operands 


AXR 


36 


RR 


R1,R2 


ADR 


2A 


RR 


R1,R2 


AD 


6A 


RX 


R1,D2(X2,B2) 


AER 


3A 


RR 


R1,R2 


AE 


7A 


RX 


R1,D2(X2,B2) 


AWR 


2E 


RR 


R1,R2 


AW 


6E 


RX 


R1,D2(X2,B2) 


AUR 


3E 


RR 


R1,R2 


AU 


7E 


RX 


R1,D2(X2,B2) 


CDR 


29 


RR 


R1,R2 


CD 


69 


RX 


R1,D2(X2,B2) 


CER 


39 


RR 


R1,R2 


CE 


79 


RX 


R1,D2(X2,B2) 


DDR 


2D 


RR 


R1,R2 


DD 


6D 


RX 


R1,D2(X2,B2) 


DER 


3D 


RR 


R1,R2 


DE 


7D 


RX 


R1,D2(X2,B2) 


HDR 


24 


RR 


R1,R2 


HER 


34 


RR 


R1,R2 


LTDR 


22 


RR 


R1,R2 


LTER 


32 


RR 


R1,R2 


LCDR 


23 


RR 


R1,R2 


LCER 


33 


RR 


R1,R2 


LDR 


28 


RR 


R1,R2 


LD 


68 


RX 


R1,D2(X2,B2) 


LNDR 


21 


RR 


R1,R2 


LNER 


31 


RR 


R1,R2 


LPDR 


20 


RR 


R1,R2 


LPER 


30 


RR 


R1,R2 


)LRDR 


25 


RR 


R1,R2 


LRER 


35 


RR 


R1,R2 


LER 


38 


RR 


R1,R2 


LE 


78 


RX 


R1,D2(X2,B2) 


MXR 


26 


RR 


R1,R2 


MDR 


2C 


RR 


R1,R2 


MD 


6C 


RX 


R1,D2(X2,B2) 


MXDR 


27 


RR 


R1,R2 


MXD 


67 


RX 


R1,D2(X2,B2) 


MER 


3C 


RR 


R1,R2 


ME 


7C 


RX 


R1,D2(X2,B2) 


STD 


60 


RX 


R1,D2(X2,B2) 


STE 


70 


RX 


R1,D2(X2,B2) 


SXR 


37 


RR 


R1,R2 


SDR 


2B 


RR 


R1.R2 



RX R1,D2(X2,B2) 



MACHINE INSTRUCTIONS (. . . .Cont'd) 
Floating Point Instructions ( Cont'd) 



r j Format Operands 
monic Code v 



Subtract Normalized, Short (c) SER 

Subtract Normalized, Short (c) SE 

Subtract Unnormalized,Long (c) SWR 

Subtract Unnormalized,Long (c) SW 

Subtract Unnormalized,Short (c) SUR 

Subtract Unnorma I ized, Short (c) SU 



(a) Direct Control Feature 
(c) Condition Code is set 
(m)Monitoring Feature 



R1,R2 

R1,D2(X2,B2) 

R1,R2 

RI,D2(X2,B2) 

RI,R2 

R1,D2(X2,B2) 

s loaded 



(n) New Condition Code U 

(p) Privileged Instruction 

(x) Extended precision floating point feature 



EXTENDED MNEMONIC INSTRUCTION CODES 



GENERAL 








Extended Code 


Machin 


i Instruction 


Meaning 


B 


D2(X2,B2) 


BC 15, 


D2(X2,B2) 


Branch Unconditionally 


BR 


R2 


BCR 15 


R2 


Branch Unconditionally 


NOP 


D2(X2,B2) 


BCO, 


D2(X2,B2) 


No Operation 


NOPR 


R2 


BCRO, 


R2 


No Operation (RR) 


AFTER COMPARE INSTRUCTIONS (A:B) 




BH 


D2(X2,B2) 


BC2, 


D2(X2,B2) 


Branch on A High 


BL 


D2(X2,B2) 


BC4, 


D2(X2,B2) 


Branch on A Low 


BE 


D2(X2,B2) 


BC8, 


D2(X2,B2) 


Branch on A equal B 


BNH 


D2(X2,B2) 


BC 13, 


D2(X2,B2) 


Branch on A not High 


BNL 


D2(X2,B2) 


BC 11, 


D2(X2,B2) 


Branch on A not Low 


BNE 


D2(X2,B2) 


BC7, 


D2(X2,B2) 


Branch on A not Equal B 


AFTER ARITHMATIC INSTRUCTIONS 




BO 


D2(X2,B2) 


BC 1, 


D2(X2,B2) 


Branch on Overflow 


BP 


D2(X2,B2) 


BC2, 


D2(X2,B2) 


Branch on Plus 


BM 


D2(X2,B2) 


BC4, 


D2(X2,B2) 


Branch on Minus 


BZ 


D2(X2,B2) 


BC8, 


D2(X2,B2) 


Branch on Zero 


BNP 


D2(X2,B2) 


BC 13, 


D2(X2,B2) 


Branch on not Plus 


BNM 


D2(X2,B2) 


BC 11, 


D2(X2,B2) 


Branch on not Minus 


BNZ 


D2(X2,B2) 


BC7, 


D2(X2,B2) 


Branch on not Zero 


AFTER TEST UNDER MASK INSTRUCTIONS 




BO 


D2(X2,B2) 


BC 1, 


D2(X2,B2) 


Branch if Ones 


BM 


D2(X2,B2) 


BC4, 


D2(X2,B2) 


Branch if Mixed 


BZ 


D2(X2,B2) 


BC8, 


D2(X2,B2) 


Branch if Zero's 


BNO 


D2(X2,B2) 


BC 14, 


D2(X2,B2) 


Branch if not Ones 



CNOP ALIGNMENT 



Double Word 


Word 


Word 


Half Word | Half Word 


Half Word | Half Word 


Byte i Byte i Byte j Byte 


Byte i Byte ; Byte ! Byte 


^A "^-n ^^ ^^ 

0,4 2,4 0,4 2,4 
0,8 2,8 4,8 6,8 



EDIT AND EDMK PATTERN CHARACTERS (In Hex) 

20 - Digit selector 40 - Blank 5C - Aterisk 

21 - Start of significance 4B - Period 6B - Comma 

22 - Field separator 5B - Dollar sign C3D9-CR 
ASSEMBLER INSTRUCTIONS 



Define Constant 

Define Storage 

Define Channel Command Word 

Start Assembly 

Identify Control Section 

Identify Dummy Section 

Identify blank common Control Section 

Identify Entry Point Symbol 

Identify External Symbol 

Identify weak External Symbol 

Use Base Address Register 
Drop Base Address Register 

Identify Assembly Output 

Start new Page 

Space Listing 

Print Optional Data 

Input Format Control 
Input Sequence Checking 
Punch a Card 
Reproduce following Card 
Set Location Counter 
Equate Symbol 
Begin Literal Pool 
Conditional No-Operation 
Copy predefined Source Coding 
End Assembly 

Macro Definition Header 
Request for Error Message 
Macro Definition Exit 
Macro Definition Trailer 

Conditional Assembly Loop Counter 

Unconditional Branch 

Conditional Branch 

Assembly No-Operation 

Define global SETA Symbol 

Define global SETB Symbol 

Define global SETC Symbol 

Define local SETA Symbol 

Define local SETB Symbol 

Define local SETC Symbol 

Set Arithmetic Variable Symbol 

Set Arithmetic 

Set Character Variable Symbol 



Function 


Mnemonic 


Data Definition 


DC 




DS 




CCW 


Program Sectioning 


START 


and Linking 


CSECT 




DSECT 




COM 




ENTRY 




EXTRN 




WXTRN 


Base Register 


USING 


Assignment 


DROP 


Control of listings 


TITLE 




EJECT 




SPACE 




PRINT 


Program Control 


ICTL 




ISEQ 




PUNCH 




REPRO 




ORG 




EQU 




LTORG 




CNOP 




COPY 




END 


Macro Definition 


MACRO 




MNOTE 




MEXIT 




MEND 


Conditional 


ACTR 


Assembly 


AGO 




AIF 




ANOP 




GBLA 




GBLB 




GBLC 




LCLA 




LCLB 




LCLC 




SETA 




SETB 




SETC 



SUMMARY OF CONSTANTS 



Type 


Implied 
Length 
Bytes 


Alignment 


Format 


Truncation 
Padding 


C 


_ 


Byte 


Characters 


Right 


X 


- 


Byte 


Hexadecimal Digits 


Left 


B 


- 


Byte 


Binary Digits 


Left 


F 


4 


Word 


Fixed-point Binary 


Left 


H 


2 


Halfword 


Fixed-point Binary 


Left 


E 


4 


Word 


Short Floating-point 


Right 


D 


8 


Double word 


Long Floating-point 


Right 


L 


16 


Doubleword 


Extended Floating-point 


Right 


P 


_ 


Byte 


Packed Decimal 


Left 


Z 


_ 


Byte 


Zoned Decimal 


Left 


A 


4 


Word 


Value of Address 


Left 


Y 


2 


Halfword 


Value of Address 


Left 


S 


2 


Halfword 


Address in Base-Displacement form 


- 


V 


4 


Word 


Externally defined Address Value 


Left 



CONDITION CODES 



Condition Code Setting 





1 


2 


3 


Mask Bit Position 


8 


4 


2 


1 


Floating Point Arithmetic 










Add Normalized S/L/E 


zero 


<zero 


>zero 


_ 


Add Unnormalized S/L 


zero 


<zero 


>zero 


- 


Compare S/L (A-.B) 


equal 


A low 


A high 


- 


Load and Test S/L 


zero 


<zero 


>zero 


- 


Load Complement S/L 


zero 


<zero 


>zero 


- 


Load Negative S/L 


zero 


<zero 


- 


- 


Load Positive S/L 


zero 


- 


>zero 


- 


Subtract Normalized S/L/E 


zero 


< zero 


>zero 


- 


Subtract Unnormalized S/L 


zero 


<zero 


>zero 


- 


Fixed Point and Decimal Arithmetic 








Add H/F/Dec. 


zero 


<zero 


>zero 


overflow 


Add Logical 


zero, 


not zero, 


zero, 


not zero. 




no carry 


no carry 


carry 


carry 


Compare H/F/Dec. (A:B) 


equal 


A low 


A high 


- 


Compare and Swap/Double 


equal 


not equal 


- 


- 


Load and Test 


zero 


<zero 


>zero 


- 


Load Complement 


zero 


<zero 


>zero 


overflow 


Load Negative 


zero 


<zero 


- 


- 


Load Positive 


zero 


- 


> zero 


overflow 


Shift and Round Decimal 


zero 


<zero 


>zero 


overflow 


Shift Left Single/Double 


zero 


<zero 


>zero 


overflow 


Shift Right Single/Double 


zero 


<zero 


>zero 


- 


Subtract H/F/Dec. 


zero 


<zero 


>zero 


overflow 


Subtract Logical 


- 


not zero, 


zero, 


not zero, 






no carry 


carry 


carry 


Zero and Add 


zero 


<zero 


>zero 


overflow 



CONDITION CODES (. . . .Cont'd) 

Condition Code Setting 

Mask Bit Position 8 



Logical Operations 

AND 

Compare Logical (A:B) 

Edit 

Edit and Mark 

Exclusive OR 

Insert Characters under Mask 

Move Long (A:B) 

OR 

Test under Mask 

Translate and Test 

Input/Output Operations 

Clear I/O 

Halt I/O, Halt Device 

Start l/0,SIOF 
Store Channel ID 
Test I/O 
Test Channel 



zero 
equal 

zero 
zero 
all zero 

zero 

zero 



not zero 

A low A high 

<zero > zero 

<zero > zero 

not zero 

l Jf bit one ]s f bit zero 

A low A high 

not zero 

mixed 

incomplete complete 



no oper in 

interruptior 

pending 

started 

ID stored 

available 

available 



:ellaneous Operations 



CSW stored chan busy not oper 

CSW stored See Prin Op not oper 

CSW stored busy not oper 

CSW stored ID not stored not oper 

CSW stored busy not oper 

interruption burst mode not oper 
pending 



Mis 

Set Clock 
Store Clock 
Test and set 
Load Real Address 



Reset Reference Bit 



Signal Processor 



set secure - not oper 

set not set error not oper 

zero one 

Translation Segment Page table Segment- 
available table entry entry invalid or Page 

invalid table length 

violation 

Ref bit zero, Ref bit zero, Ref bit one, Refbit.one, 

change bit change bit change bit change bit 

zero one zero one 

accepted stat stored busy not oper 



CODE TRANSLATION TABLE 



Dec 


Hex 


Instruction 

(RR) 


Graphics and Controls 


7-Track Tape 
BCDIC (2) 


Card Code 


Binary 


BCDIC 


EBCDIC(l) 


ASCII 





00 






NUL 


NUL 




12-0-1-8-9 


0000 0000 


1 


01 






SOH 


SOH 




12-1-9 


0000 0001 


2 


02 






STX 


STX 




12-2-9 


0000 0010 


3 


03 






ETX 


ETX 




12-3-9 


0000 001 1 


4 


04 


SPM 




PF 


EOT 




12-4-9 


0000 0100 


5 


05 


BALR 




HT 


ENO 




12-5-9 


0000 0101 


6 


06 


BCTR 




LC 


ACK 




12-6-9 


0000 01 10 


7 


07 


BCR 




DEL 


BEL 




12-7-9 


0000 01 1 1 


8 


08 


SSK 






BS 




12-8-9 


0000 1000 


9 


09 


ISK 






HT 




12-1-8-9 


0000 1001 


10 


0A 


SVC 




SMM 


LF 




12-2-8-9 


0000 1010 


11 


OB 






VT 


VT 




12-3-8-9 


0000 1011 


12 


OC 






FF 


FF 




12-4-8-9 


0000 1100 


13 


OD 






CR 


CR 




12-5-8-9 


0000 1101 


14 


OE 


MVCL 




SO 


SO 




12-6-8-9 


0000 1 1 10 


15 


OF 


CLCL 




SI 


SI 




12-7-8-9 


0000 1 1 1 1 


16 


10 


LPR 




DLE 


DLE 




12-11-1-8-9 


0001 0000 


17 


11 


LNR 




DC1 


DC1 




11-1-9 


0001 0001 


18 


12 


LTR 




DC2 


DC2 




11-2-9 


0001 0010 


19 


13 


LCR 




TM 


DC3 




11-3-9 


0001 001 1 


20 


14 


NR 




RES 


DC4 




11-4-9 


0001 0100 


21 


15 


CLR 




NL 


NAK 




11-5-9 


0001 0101 


22 


16 


OR 




BS 


SYN 




11-6-9 


0001 0110 


23 


17 


XR 




IL 


ETB 




11-7-9 


0001 01 1 1 


24 


18 


LR 




CAN 


CAN 




11-8-9 


0001 1000 


25 


19 


CR 




EM 


EM 




11-1-8-9 


0001 1001 


26 


1A 


AR 




CC 


SUB 




11-2-8-9 


0001 1010 


27 


IB 


SR 




CU1 


ESC 




11-3-8-9 


0001 1011 


28 


1C 


MR 




IFS 


FS 




11-4-8-9 


0001 1100 


29 


ID 


DR 




IGS 


GS 




11-5-8-9 


0001 1101 


30 


IE 


ALR 




IRS 


RS 




11-6-8-9 


0001 1110 


31 


IF 


SLR 




IUS 


US 




11-7-8-9 


oooi mi 


32 


20 


LPDR 




DS 


SP 




11-0-1-8-9 


0010 0000 


33 


21 


LNDR 




SOS 


1 ! 




0-1-9 


0010 0001 


34 


22 


LTDR 




FS 






0-2-9 


0010 0010 


35 


23 


LCDR 






ft 




0-3-9 


0010 0011 


36 


24 


HDR 




BYP 


$ 




0-4-9 


0010 0100 


37 


25 


LRDR 




LF 


% 




0-5-9 


0010 0101 


38 


26 


MXR 




ETB 


& 




0-6-9 


0010 0110 


39 


27 


MXDR 




ESC 






0-7-9 


0010 0111 


40 


28 


LDR 






( 




0-8-9 


0010 1000 


41 


29 


CDR 






) 




0-1-8-9 


0010 1001 


42 


2A 


ADR 




SM 






0-2-8-9 


0010 1010 


43 


2B 


SDR 




CU2 


+ 




0-3-8-9 


0010 1011 


44 


2C 


MDR 






t 




0-4-8-9 


0010 1100 


45 


2D 


DDR 




ENQ 


- 




0-5-8-9 


0010 1101 


46 


2E 


AWR 




ACK 






0-6-8-9 


0010 1110 


47 


2F 


SWR 




BEL 


'/ 




0-7-8-9 


ooio mi 


48 


30 


LPER 











12-11-0-1-8- 


?oon oooo 


49 


31 


LNER 






1 




1-9 


0011 0001 


50 


32 


LTER 




SYN 


2 




2-9 


00110010 


51 


33 


LCER 






3 




3-9 


0011 0011 


52 


34 


HER 




PN 


4 




4-9 


0011 0100 


53 


35 


LRER 




RS 


5 




5-9 


0011 0101 



CODE TRANSLATION TABLE (....Cont'd) 



Dec 


Hex 


Instruction 

(RR) 


Graphics and Controls 


7-Track Tape 
BCDIC (2) 


Card Code 


Binary 


BCDIC 


EBCDIC (1) ASCII 


54 


36 


AXR 




UC 


6 




6-9 


0011 0110 


55 


37 


SXR 




EOT 


7 




7-9 


0011 0111 


56 


38 


LER 






8 




8-9 


0011 1000 


57 


39 


CER 






9 




1-8-9 


0011 1001 


58 


3A 


AER 










2-8-9 


0011 1010 


59 


3B 


SER 




CU3 


• 




3-8-9 


0011 1011 


60 


3C 


MER 




DC4 


< 




4-8-9 


0011 1100 


61 


3D 


DER 




NAK 






5-8-9 


0011 1101 


62 


3E 


AUR 






> 




6-8-9 


0011 1110 


63 


3F 


SUR 




SUB 


? 




7-8-9 


ooii mi 



1 EBCDIC graphics shown are standard bit pattern assignments. For specific print train/ 
chain: See printer manual. 

2 Add C (check bit) for odd or even parity as needed, exept as noted. 

3 For even parity use CA 



Dec 


Hex 


Instruction 


Grapr 


ics and Controls 


7-Track Tape 


Card Code 


Binary 


(RX) 


BCDIC 


EBCDIC(l) 


ASCII 


BCDIC (2) 


64 


40 


STH 




SP 





(3) 


no punches 


0100 0000 


65 


41 


LA 






A 




12-0-1-9 


0100 0001 


66 


42 


STC 






B 




12-0-2-9 


0100 0010 


67 


43 


1C 






C 




12-0-3-9 


0100 0011 


68 


44 


EX 






D 




12-0-4-9 


0100 0100 


69 


45 


BAL 






E 




12-0-5-9 


0100 0101 


70 


46 


BCT 






F 




12-0-6-9 


01000110 


71 


47 


BC 






G 




12-0-7-9 


01000111 


72 


48 


LH 






H 




12-0-8-9 


0100 1000 


73 


49 


CH 






1 




12-1-8 


0100 1001 


74 


4A 


AH 




t 


J 




12-2-8 


0100 1010 


75 


4B 


SH 






K 


BA8 2 1 


12-3-8 


0100 1011 


76 


4C 


MH 


n 


< 


L 


B A84 


12-4-8 


0100 1100 


77 


4D 




[ 


( 


M 


B A84 1 


12-5-8 


0100 1101 


78 


4E 


CVD 


< 


+ 


N 


BA842 


12-6-8 


0100 1110 


79 


4F 


CVB 


m 


1 


O 


BA842 1 


12-7-8 


oioo mi 


80 


50 


ST 


&+ 


& 


P 


B A 


12 


0101 0000 


81 


51 








Q 




12-11-1-9 


0101 0001 


82 


52 








R 




12-11-2-9 


0101 0010 


83 


53 








S 




12-11-3-9 


0101 0011 


84 


54 


N 






T 




12-11-4-9 


0101 0100 


85 


55 


CL 






U 




12-11-5-9 


0101 0101 


86 


56 


O 






V 




12-11-6-9 


0101 0110 


87 


57 


X 






w 




12-11-7-9 


0101 0111 


88 


58 


L 






X 




12-11-8-9 


0101 1000 


89 


59 


C 






Y 




11-1-8 


0101 1001 


90 


5A 


A 




! 


z 




11-2-8 


0101 1010 


91 


5B 


S 


$ 


$ 


[ 


B 8 2 1 


11-3-8 


0101 1011 


92 


5C 


M 


* 


* 


\ 


B 84 


11-4-8 


0101 1100 


93 


5D 


D 


] 


) 


] 


B 84 1 


11-5-8 


0101 1101 


94 


5E 


AL 


; 


; 


_, * 


B 842 


11-6-8 


0101 1110 


95 


5F 


SL 


^ 


— , 


_ 


B 842 1 


11-7-8 


oioi nn 


96 


60 


STD 


- 


- 




B 


11 


0110 0000 


97 


61 




/ 


/ 


a 


A 1 


0-1 


0110 0001 


98 


62 








b 




11-0-2-9 


0110 0010 



CODE TRANSLATION TABLE (....Cont'd) 



Dec 


Hex 


Instruction 

(RX) 


Graphics and Controls 


7-Track Tape 
BCDIC (2) 


Card Code 


Binary 


BCDIC 


EBCDIC(l) 


ASCII 


99 


63 








c 




11-0-3-9 


0110 0011 


100 


64 








d 




11-0-4-9 


0110 0100 


101 


65 








e 




11-0-5-9 


01100101 


102 


66 








f 




11-0-6-9 


01100110 


103 


67 


MXD 






9 




11-0-7-9 


01100111 


104 


68 


LD 






h 




11-0-8-9 


0110 1000 


105 


69 


CD 






i 




0-1-8 


0110 1001 


106 


6A 


AD 




! 


j 




12-11 


0110 1010 


107 


6B 


SD 






k 


A8 2 1 


0-3-8 


0110 1011 


108 


6C 


MD 


% 


% 


1 


A84 


0-4-8 


0110 1100 


109 


6D 


DD 


Y 




m 


A84 1 


0-5-8 


0110 1101 


110 


6E 


AW 


\ 


> 


n 


A8 42 


0-6-8 


0110 1110 


111 


6F 


SW 


* 


? 


o 


A842 1 


0-7-8 


ono mi 


112 


70 


STE 






P 




12-11-0 


0111 0000 


113 


71 








q 




12-11-0-1-9 


0111 0001 


114 


72 












12-11-0-2-9 


0111 0010 


115 


73 








s 




12-11-0-3-9 


0111 0011 


116 


74 








t 




12-11-0-4-9 


0111 0100 


117 


75 








u 




12-11-0-5-9 


0111 0101 


118 


76 








v 




12-11-0-6-9 


0111 0110 


119 


77 








w 




12-11-0-7-9 


0111 0111 


120 


78 


LE 






x 




12-11-0-8-9 


0111 1000 


121 


79 


CE 






y 




1-8 


0111 1001 


122 


7A 


AE 






z 


A 


2-8 


0111 1010 


123 


7B 


SE 


#= 


'i¥ 


{ 


8 2 1 


3-8 


0111 1011 


124 


7C 


ME 


©' 


@ 


1 


84 


4-8 


0111 1100 


125 


7D 


DE 






I 


84 1 


5-8 


0111 1101 


126 


7E 


AU 


> 


= 


842 


6-8 


0111 1110 


127 


7F 


SU 


V 


" 


DEL 


842 1 


7-8 


oin mi 



1 EBCDIC graphics shown are standard bit pattern assignments. For specific print train/ 
chain: See printer manual. 

2 Add C (check bit) for odd or even parity as needed, exept as noted. 



Dec 


Hex 


Instruction 
(RS,SI,S) 


Graphics and Controls 


7-Track Tape 
BCDIC (2) 


Card Code 


Binary 


BCDIC 


EBCDIC a; 


ASCI 


128 


80 


SSM 










12-0-1-8 


1000 0000 


129 


81 






a 






12-0-1 


1000 0001 


130 


82 


LPSW 




b 






12-0-2 


1000 0010 


131 


83 


Diagnose 




c 






12-0-3 


1000 00 11 


132 


84 


WRD 




d 






12-0-4 


1000 0100 


133 


85 


RDD 




e 






12-0-5 


1000 0101 


134 


86 


BXH 




f 






12-0-6 


1000 01 10 


135 


87 


BXLE 




g 






12-0-7 


1000 01 1 1 


136 


88 


SRL 




h 






12-0-8 


1000 1000 


137 


89 


SLL 




i 






12-0-9 


1000 1001 


138 


BA 


SRA 










12-0-2-8 


1000 1010 


139 


RR 


SLA 










12-0-3-8 


1000 1011 


140 


8C 


SRDL 










12-0-4-8 


1000 1100 


141 


RD 


SLDL 










12-0-5-8 


1000 1101 


14? 


8F 


SRDA 










12-0-6-8 


1000 1110 


143 


8F 


SLDA 










12-0-7-8 


1000 11 1 1 


144 


90 


STM 










12-11-1-8 


1001 0000 



CODE TRANSLATION TABLE (. . . .Cont'd) 



Dec 


Hex 


Instruction 
(RS,SI,S) 


Graphics and Controls 


7-Track Tape 
BCDIC (2) 


Card Code 


Binary 


BCDIC 


EBCDICO 


ASCI! 


145 


91 


TM 




j 






12-11-1 


1001 0001 


146 


92 


MVI 




Ic 






12-11-2 


1001 0010 


147 


93 


TS 




1 






12-11-3 


1001 0011 


148 


94 


Nl 




m 






12-11-4 


1001 0100 


149 


95 


CLI 




n 






12-11-5 


1001 0101 


150 


96 


Ol 




o 






12-11-6 


1001 0110 


151 


97 


XI 




P 






12-11-7 


1001 0111 


152 


98 


LM 




q 






12-11-8 


1001 1000 


153 


99 












12-11-9 


1001 1001 


154 


9A 












12-11-2-8 


1001 1010 


155 


9B 












12-11-3-8 


1001 1011 


156 


9C 


SIO,SIOF 










12-11-4-8 


1001 1100 


157 


9D 


TIO 










12-11-5-8 


1001 1101 


158 


9E 


HIO,HDV 










12-11-6-8 


1001 1110 


159 


9F 


TCH 










12-11-7-8 


looi mi 


160 


A0 












11-0-1-8 


1010 0000 


161 


Al 






. — 






11-0-1 


1010 0001 


162 


A2 






s 






11-0-2 


1010 0010 


163 


A3 






f 






11-0-3 


1010 0011 


164 


A4 






u 






11-0-4 


1010 0100 


165 


A5 






v 






11-0-5 


1010 0101 


166 


A6 






w 






11-0-6 


1010 0110 


167 


A7 






X 






11-0-7 


10100111 


168 


A8 






y 






11-0-8 


1010 1000 


169 


A9 












11-0-9 


1010 1001 


170 


AA 












11-0-2-8 


1010 1010 


171 


AB 












11-0-3-8 


1010 1011 


172 


AC 


STNSM 










11-0-4-8 


1010 1100 


173 


AD 


STOSM 










11-0-5-8 


1010 1101 


174 


AE 


SIGP 










11-0-6-8 


1010 1110 


175 


AF 


MC 










11-0-7-8 


ioio mi 


176 


BO 












12-11-0-1-8 


1011 0000 


177 


Bl 


LRA 










12-11-0-1 


ion oooi 


178 


B2 


See below 










12-11-0-2 


1011 0010 


179 


B3 












12-11-0-3 


1011 0011 


180 


B4 












12-11-0-4 


1011 0100 


181 


B5 












12-11-0-5 


1011 0101 


182 


B6 


STCTL 










12-11-0-6 


1011 0110 


183 


B7 


LCTL 










12-11-0-7 


1011 0111 


184 


B8 












12-11-0-8 


1011 1000 


185 


B9 












12-11-0-9 


1011 1001 


186 


BA 


CS 










12-11-0-2-8 


1011 1010 


187 


BB 


CDS 










12-11-0-3-8 


1011 1011 


188 


BC 












12-11-0-4-8 


1011 1100 


189 


BD 


CLM 










12-11-0-5-8 


1011 1101 


190 


BE 


STCM 










12-11-0-6-8 


1011 1110 


191 


BF 


ICM 










12-11-0-7-8 


ion nn 



Op Code : 

B202 - STIDP B207 - STCKC 

B203 - STIDC B208 - SPT 

B204 - SCK B209 - STPT 

B205-STCK B20D-PTLB 

B206 - SCKC B213 - RRB 



CODE TRANSLATION TABLE (. . . .Cont'd) 



Dec 


Hex 


Instruction 
(SS) 


Graphics and Controls 


7-Track Tape 
BCDIC (2) 


Card Code 


Binary 


BCDIC 


EBCDICO 


ASCII 


-192 


CO 




? 


{ 




BA8 2 


12-0 


1 100 0000 


193 


CI 




A 


A 




B A 1 


12-1 


1100 0001 


194 


C2 




B 


B 




BA 2 


12-2 


1100 0010 


195 


C3 




C 


C 




BA 2 1 


12-3 


1100 0011 


196 


C4 




D 


D 




B A 4 


12-4 


11000100 


197 


C5 




E 


E 




BA 4 1 


12-5 


1100 0101 


198 


C6 




F 


F 




BA 42 


12-6 


1100 0110 


199 


C7 




G 


G 




BA 42 1 


12-7 


1100 0111 


200 


C8 




H 


H 




BA8 


12-8 


1100 1000 


201 


C9 




1 


1 




BA8 1 


12-9 


1100 1001 


202 


CA 












12-0-2-8-9 


1100 1010 


203 


CB 












12-0-3-8-9 


1100 1011 


204 


CC 






■r 






12-0-4-8-9 


1100 1100 


205 


CD 












12-0-5-8-9 


1100 1101 


206 


CE 






V 






12-0-6-8-9 


1100 1110 


207 


CF 












12-0-7-8-9 


noo mi 


208 


DO 




1 


} 




B 8 2 


11-0 


1101 0000 


209 


Dl 


MVN 


J 


J 




B 1 


11-1 


1101 0001 


210 


D2 


MVC 


K 


K 




B 2 


11-2 


1101 0010 


211 


D3 


MVZ 


L 


L 




B 2 1 


11-3 


1101 0011 


212 


D4 


NC 


M 


M 




B 4 


11-4 


1101 0100 


213 


D5 


CLC 


N 


N 




B 4 1 


11-5 


1101 0101 


214 


D6 


OC 


O 


O 




B 42 


11-6 


1101 0110 


215 


D7 


XC 


P 


P 




B 42 1 


11-7 


1101 0111 


216 


D8 




Q 


Q 




B 8 


11-8 


1101 1000 


217 


D9 




R 


R 




B 8 1 


11-9 


1101 1001 


218 


DA 












12-11-2-8-9 


1101 1010 


219 


DB 












12-11-3-8-9 


1101 1011 


220 


DC 


TR 










12-11-4-8-9 


1101 1100 


221 


DD 


TRT 










12-11-5-8-9 


1101 1101 


222 


DE 


ED 










12-11-6-8-9 


1101 1110 


223 


DF 


EDMK 










12-11-7-8-9 


noi mi 


224 


E0 




* 


\ 




A8 2 


0-2-8 


1 1 10 0000 


225 


El 










11-0-1-9 


1110 0001 


226 


E2 




S 


S 




A 2 


0-2 


1110 0010 


227 


E3 




T 


T 




A 2 1 


0-3 


1110 0011 


228 


E4 




U 


U 




A 4 


0-4 


mooioo 


229 


E5 




V 


V 




A 4 1 


0-5 


niooioi 


230 


E6 




W 


w 




A 42 


0-6 


1110 01 10 


231 


E7 




X 


X 




A 42 1 


0-7 


1110 0111 


232 


E8 




Y 


Y 




A8 


0-8 


mo looo 


233 


E9 




z 


z 




A8 1 


0-9 


1110 1001 


234 


EA 












11-0-2-8-9 


1110 1010 


235 


EB 












11-0-3-8-9 


1110 1011 


236 


EC 






H 






11-0-4-8-9 


1110 1100 


237 


ED 












11-0-5-8-9 


1110 1101 


238 


EE 












H-0-6-8-9 


1110 1110 


239 


EF 












H-0-7-8-9 


mo nn 


240 


FO 


SRP 










8 2 





mi oooo 


241 


Fl 


MVO 


1 


i 




1 


1 


11110001 


242 


F2 


PACK 


2 


2 




2 


2 


nn ooio 


243 


F3 


UNPK 


3 


3 




2 1 


3 


nn oon 


244 


F4 




4 


4 




4 


4 


1111 0100 


245 


F5 




5 


5 




4 1 


5 


11110101 



CODE TRANSLATION TABLE (. . . .Cont'd) 



Dec 


Hex 


Instruction 
(SS) 


Graphics and Controls 


7-Track Tape 
BCDIC (2) 


Card Code 


Binary 


BCDIC 


EBCDIC(1)ASCII 


246 


F6 




6 


6 




42 


6 


1111 0110 


247 


F7 




7 


7 




42 1 


7 


1111 0111 


248 


F8 


ZAP 


8 


8 




8 


8 


1111 1000 


249 


F9 


CP 


9 


9 




8 1 


9 


1111 1001 


250 


FA 


AP 




1 






12-11-0-2-8-91111 1010 


251 


FB 


SP 










12-11-0-3-8-9 1111 1011 


?W 


FC 


MP 










12-11-0-4-8-91111 1100 


253 


FD 


DP 










1 2- T 1-0-5-8-9 


1111 1101 


754 


FE 












12-11-0-6-8-9 1111 1110 


255 


FF 












12-11-0-7-8-91111 1111 



MACHINE INSTRUCTIONS FORMATS 



HRST HALFWORD1 



SECOND HALFWORD2 



THIRD HALFWORD 3 



REGISTER 
OPERAND 1 



REGISTER 
OPERAND 2 



Op Code | Rl | R2 



7|8 1112 15 
REGISTER 
OPERAND 1 



Op Code | Rl | 



ADDRESS OF 
OPERAND 2 



7|8 11 12 15|16 19 20 
REGISTER REGISTER ADDRESS OF 

OPERAND 1 OPERAND 3 OPERAND 2 



Op Code 



11 12 15 
IMMEDIATE 
OPERAND 



16 19 20 

ADDRESS OF 
OPERAND 1 



16 1920 

ADDRESS OF 
OPERAND 1 



LENGTH LENGTH ADDRESS OF 

OPERAND 1 OPERAND 2 OPERAND 1 



Op Code 1 LI JL2/I3J Bl I 



ADDRESS OF 
OPERAND 2 



Op Code 



11 12 15 
LENGTH 



16 19 20 

ADDRESS OF 
OPERAND 1 



15 16 19 20 

1-13 



32 35 36 
ADDRESS OF 



31 32 35 36 



CONTROL REGISTER ALLOCATION 






1 


2 1 3 


SYSTEM CONTR 


TRANSL CONTR 


EXTERNAL INTERRUPTION MASKS 


SEGM TBL LENGTH 


SEGMENT TABLE ORIGIN ADDRESS | 


CHANNEL MASKS 














MONITOR MASKS 


PER EVENT MASKS 




PER GR ALTERATION MASKS 




PER STARTING ADDRESS 




PER ENDING ADDRESS 






ERROR RECOVERY 
CONTR & MASKS 






MCEL ADDRESS 



ASSIGNMENT Of CONTROL REGISTER FIELDS 



Word 


Bits 


Name of Field 


Facility 


Initial 
value 















1 
8-9 
10 
11-12 
20 
21 
24 
25 
26 


Block-Multiplexing Mode 

SSM Suppression 

Page Size 

Reserved 

Segment Size 

Clock Comparator Mask 

CPU Timer Mask 

Interval Timer Mask 

Interrupt Key Mask 

External Signal Mask 


Block Multiplexing Control 

Extended Control 

Dynamic Address Translation 

Dynamic Address Translation 

Dynamic Address Translation 

Clock Comparator 

CPU Timer 

External Interruption 

External Interruption 

External Interruption 









1 
1 
1 


1 
1 


0-7 
8-25 


Segment Table Length 
Segment Table Address 


Dynamic Address Translation 
Dynamic Address Translation 






2 


0-31 


Channel Masks 


I/O Interruptions 


1 


8 


16-31 


Monitor Masks 


Monitoring 





9 
9 


0-7 
16-31 


PER* Event Masks 

PER GR Aletration Masks 


Program-Event Recording 
Program- Event Recording 






10 


8-31 


PER Staring Address 


Program-Event Recording 






ASSIGNMENT OF CONTROL REGISTER FIELDS (....Cont'd) 



Word 


Bits 


Name of Field 


Facility 


Initial 
value 


11 


8-31 


PER Ending Address 


Program-Event Recording 





14 
14 
14 
14 
14 
14 
14 
14 
14 




1 
2 
4 
5 
6 
7 
8 
9 


Check-Stop Control 
Synchronous MCEL** Control 
I/O Extended Logout Control 
Recovery Report Mask 
Degradation Report Mask 
External Damage Report Mask 
Warning Mask 
Asynchronous MCEL Control 
Asynchronous Fixed Log Contr. 


Machine-Check Handling 
Machine-Check Handling 
Machine-Check Handling 
Machine-Check Handling 
Machine-Check Handling 
Machine-Check Handling 
Machine-Check Handling 
Machine-Check Handling 
Machine-Check Handling 


1 
1 





1 






15 


8-28 


MCEL Address 


Machine-Check Handling 


512*** 



Explanation: 

The fields not listed are unassigned. 

The initial value of unassigned register positions is unpredictable. 

* PER means Program-Event Recording 
** MCEL means machine-check extended logout 

*** Bit 22 is set to one, with all other bits set to zero, thus yielding a decimal 
byte address of 512 



PERMANENT MAIN STORAGE ASSIGNMENT 



Storage Loc 


Byte 


B 






Byte 


Byte 


Hex 


Dec 


y 








Restart New PSW (IPL PSW) 




4 
8 


4 
8 






Restart Old PSW(IPLCCWl) 




C 
10 


12 
16 






(IPL CCW2) 




14 
18 


20 
24 






External Old PSW 




1C 
20 


28 
32 






Supervisor Call Old PSW 




24 
28 


36 
40 






Program Old PSW 




2C 
30 


44 
48 






Machine Check Old PSW 




34 
38 


52 
56 






Input/Output Old PSW 




3C 
40 


60 
64 






Channel Status Word 




44 
48 
4C 
50 
54 
58 


68 
72 
76 
80 
84 
88 






Channel Address Word 




Interval Timer 




External New PSW 




5C 
60 


92 
96 






Supervisor Call New PSW 




64 
68 


100 
104 






Program New PSW 




6C 
70 


108 
112 






Machine Check New PSW 




74 
78 


116 
120 






Input/Output New PSW 




7C 
80 
84 
88 
8C 


124 
128 
132 
136 
140 








00000000 0000000 


External Interrupti 


on Code 


0000000000000 


ILC 





SVC Interruption Code 


0000000000000 


ILC 





Program Interrupt!* 


jnCode 



PERMANENT MAIN STORAGE ASSIGNMENT (. . . .Cont'd) 



Stora 


ge Loc 


Byte 


Byte 


Byte 


Byte 


Hex 


Dec 


90 
94 
98 
9C 
A0 
A4 
A8 
AC 
BO 
B4 
B8 
BC 

D4 
D8 
DC 
E0 
E4 
E8 
EC 
F0 
F4 
F8 
FC 
100 

15C 
160 

17C 
180 

1BC 
1C0 

1FC 


144 
148 
152 
156 
160 
164 
168 
172 
176 
180 
184 
188 

212 
216 
220 
224 
228 
232 
236 
240 
244 
248 
252 
256 

348 
352 

380 
384 

444 
448 

508 


00000000 


Translation Exception Address 


00000000 


Monitor Class #=\ PER Code 


00000000 


00000000 


PER Address 


00000000 


Monitor Code 




Channel ID 


|lOEL Address 


Limited Channel Logout 




|0 Ojl/O Address 




Machine Check CPU-Timer Save Area 


Machine Check Clock -Comparator Save Area 


Machine Check Interruption Code 




OJFailing Storage Address 


Region Code 


Machine Check Fixed Logout Area 


Machine Check Floating Point Register Save Area 


Machine Check General Register Save Area 


Machine Check Control Register Save Area 



PROGRAM STATUS WORD (EC-mode) 
8 16 






R 











T 


& 


E 


KEY 


1 


M 


W 


P 


00 


CC 


PROG 
MASK 


0000000 






INSTUCTION ADDRESS 



Bit 


Description 


Bit 


Description 





Always zero 


15 


Problem state 


1 


PER mask 


16-17 


Always zero 


2-4 


Always zero 


18-19 


Condition code 


5 


Translate mode 


20 


Fixed-point overflow mask 


6 


I/O interrupt mask 


21 


Decimal overflow mask 


7 


External interrupt mask 


22 


Exponent overflow mask 


8-11 


KEY 


23 


Significance mask 


12 


Always one (EC mode) 


24-31 


Always zero 


13 


Machine check mask 


32-39 


Always zero 


14 


Wait state 


40-63 


Instruction address 


PROGRAM STATUS WORD (BC-mode) 







CHAN 
MASK 
0-5 



INTERRUPTION CODE 



ILC 


CC 


PROG 
MASK 


INSTRUCTION ADDRESS 



Description 


BTt 


Channel mask 


14 


Channel 1 mask 


15 


Channel 2 mask 


16-31 


Channel 3 mask 


32-33 


Channel 4 mask 


34-35 


Channel 5 mask 


36 


Mask for channel 6 and up 


37 


External interrupt mask 


38 


Protection key 


39 


Always (BC mode) 


40-63 


Machine check mask 





Description 

Wait state 
Problem state 
Interruption code 
Instruction length code 
Condition code 
Fixed-point overflow mask 
Decimal overflow mask 
Exponent underflow mask 
Significance mask 
Instruction address 



CHANNEL ADDRESS WORD (CAW) (X'48 1 ) 



Key 





Command Address 



3 4 7 8 15 16 

CHANNEL COMMAND WORD (CCW) 



Command Code 


Data Address 


7 8 15 16 23 24 


31 


Flags 





TP Op. Code 


Byte Count 



Descriptio 



CD-bit (80) 
CC-bit (40) 
SLI-bit (20) 
Skip M 10) 
PCI-bit (08) 
IDA-bit(04) 



causes use of address portion of next CCW 

causes use of command code and data address of next CCW 

causes suppression of possible incorrect length indication 

supresses transfer of information to main storage 

causes a channel Program Controlled Interruption 

specifies indirect data addressing 



CHANNEL STATUS WORD (CSW) (X'40') 



Key 





Command Address 


3 4 7 8 


15 16 23 24 


31 


Status 


Byte Count 



32 


(8000) 


Attention 


33 


(4000) 


Status Modifier 


34 


(2000) 


Control unit end 


35 


(1000) 


Busy 


36 


(0800) 


Channel end 


37 


(0400) 


Device end 


38 


(0200) 


Unit check 


39 


(0100) 


Unit exception 


Byte 


count: 


Bits 48-63 form t 



40 


(0080) 


Program controlled interrupt 


41 


(0040) 


Incorrect length 


42 


(0020) 


Program check 


43 


(0010) 


Protection check 


44 


(0008) 


Channel data check 


45 


(0004) 


Channel control check 


46 


(0002) 


Interface control check 


47 


(0001) 


Chaining check 



LIMITED CHANNEL LOGOUT (X'BQ 1 ) 






SCUid 


Detect 


Source 





Field Validity Flags 


TT 





A 


Seq 



Description 



4 
5 
6 

7 

Field 


CPU 

Channel 

Storage control unit 

Storage unit 

Validity Flags 


Bit 


Description 


16 
17 
18 
19 
20 
21 
22 
23 


Interface address 

Reserved (0) 

Reserved (0) 

Sequence code 

Unit status 

Command address and key 

Channel address 

Device address 



Descriptio 



CPU 
Channel 

Storage control u 
Storage unit 
Control unit 



TT (Type of termination) 
Bit Description 



Interface disconnect 
Stop, stack or normal 
Selective reset 
System reset 



A (bit 28) : I/O error alert 

Seq (bits 29-31) : Sequence code 



MACHINE CHECK INTERRUPTION CODE (X'E8') 



MC Conditions 





Time 


Stg 





Validity 


8 9 13 14 16 18 19 20 


31 


00000000 0000000 


MCEL Length 



Descriptio 



System damage 
Instr.proc'g damage 
System recovery 
Timer damage 
TOD clock damage 
External damage 

Auto configuration 
Warning 



14 Backed-up 

15 I Delayed 



Storage error uncorrected 
Storage error corrected 
Storage-error key uncorrected 



MACHINE CHECK INTERRUPTION CODE (....C ont 'd) 



Validity 

Bit | Description 



PSWbits 12-15 
PSW masks and key 
Program mask and cond.code 
Instruction address 
Failing storage address 
Region code 



Description 



Floating-point registers 
General registers 
Control registers 
CPU extended logout 
Storage logical 



CODES FOR PROGRAM INTERRUPTION (X'8E') 



Interruption 


Program Interruption 


Interruption 


Program Interruption 


Code 


Cause 


Code 


Cau e 


Dec 


Hex 




Dec 


Hex 




1 


0001 


Operation 


12 


OOOC 


Exponent overflow 


2 


0002 


Privileged operation 


13 


000D 


Exponent underflow 


3 


0003 


Execute 


14 


000E 


Significance 


4 


0004 


Protection 


15 


000F 


Floating point divide 


5 


0005 


Addressing 


16 


0010 


Segment translation 


6 


0006 


Specification 


17 


0011 


Page translation 


7 


0007 


Data 


18 


0012 


Translation specification 


8 


0008 


Fixed-point overflow 


19 


0013 


Special operation 


9 


0009 


Fixed-point divide 


64 


0040 


Monitor event 


10 


000A 


Decimal overflow 


128 


0080 


Program event 


11 


000B 


Decimal divide 









CODES FOR EXTERNAL INTERRUPTIONS (X'86') 



Interruption Code 


External Interruption 


(Hex) 


Cause 


0080 


Interval timer 


0040 


Interrupt key 


0020 


External signal 2 


0010 


External signal 3 


0008 


External signal 4 


0004 


External signal 5 


0002 


External signal 6 


0001 


External signal 7 


1004 


Clock comparator 


1005 


CPU timer 



CODES FOR INPUT/OUTPUT INTERRUPTIONS (X'BA') 



Interruption Code 


Input/Output Interruption 


(Hex) 


Cause 


00 dd 


Channel 


01 dd 


1 


02 dd 


2 


03 dd 


3 


04 dd 


4 


05 dd 


5 


06 dd 


6 



Note; d= device address 



CODES FOR SUPERVISOR CALL INTERRUPTIONS (X'8A') 



Interruption Code 
(Hex) 


Supervisor Call Interruption 
Cause 


00 rr 


Instruction (0A) 



= Rl and R2 field of 
SUPERVISOR CALL 



CHANNEL COMMANDS 

Standard Command Code Assignments (CCW bits 0-7) for I/O Operations 



xxxx 0000 


Invalid 


tttt ttoi 


Write 


tttt 0100 


Sense 


tttt ttio 


Read 


xxxx 1000 


Transfer in Channel 


tttt ttll 


Control 


tttt 1100 


Read backward 


0000 0011 


Control No Operation 



x-Bit ignored t Modifier bit for specific type of I/O device 

3210, 3215 CONSOLES 



Source: GA24-3557 



Write, No Carrier Return 
Write, Auto Carrier Return 
Read Inquiry 



Sense 
Audible Alarm 



3505 CARD READER/3525 CARD PUNCH 




Source: GA21-9124 


Command 


Binary 

0000 100 
SS10 F0 1 1 

1 I DO F0 10 
110 1 00 10 
SSD0 F010 
000 1 000 1 


Hex 
04 

D2 
1 1 


Bit Meanings 
SS Stacker 

00 1 

01 2 
10 2 

Format Mode 

Unformatted 

1 Formatted 


Sense 

Feed, Select Stacker 

Read Only * 

Diagnostic Read 

Read, Feed, Select Stacker * 

Write RCE Format * t 



* Special feature on 3525 t Special feature on 3505 



3505 CARD READER/3525 CARD PUNCH (.. . .Cont'd) 






3505 only 


D Data Mode 

1-EBCDIC 

1 2-Card image 

L Line Position 
5 bit binary value 


Write OMR Format 110 1 3 1 
3525 only 


Write, Feed, Select Stacker S S DO 1 
Print Line * L L L L L 1 1 



Special feature on 3525 



3211 PRINTER/3811 CONTROL UNIT 


Source: 


GA24-3543 


After 
Write 


Immed. 


Write without spacing 


01 


Space 1 Line 09 


0B 


Space 2 Lines 1 1 


13 


Sense 


04 


Space 3 Lines 19 


IB 


Load UCSB 


FB 


Skip to Channel 


83 


Fold 


43 


Skip to Channel 1 89 


8B 


Unfold 


23 


Skip to Channel 2 91 


93 


Load FCB 


63 


Skip to Channel 3 99 


9B 


Block Data Check 


73 


Skip to Channel 4 Al 


A3 


Allow Data Check 


7B 


Skip to Channel 5 A9 


AB 


Read PLB 


02 


Skip to Channel 6 B 1 


B3 


Read UCSB 


0A 


Skip to Channel 7 B9 


BB 


Read FCB 


12 


Skip to Channel 8 CI 


C3 


Check Read 


06 


Skip to Channel 9 C9 


CB 


Diagnostic Write 


05 


Skip to Channel 10 Dl 


D3 


Raise Cover 


6B 


Skip to Channel 1 1 D9 


DB 


Diagnostic Gate 


07 


Skip to Channel 12 El 


E3 







3803/3420 MAGNETIC TAPE 






Source: 


GA32-0020 


Write 

Read Forward 


01 
02 


Data Security Erase 
Diagnostic Write Mode Set 


97 

0B 


Read Backward 

Sense 

Sense Reserve * 


OC 
04 
F4 


Set Mode 1 (7-track) 


t 




Density Parity DC 


Trans 


Cmd 


Sense Release * 


D4 


odd < „ 
556 * 0ff 

1 even off 


off 


53 


Request Track in Error 
Loop Write to Read 
Set Diagnose 
Rewind 


IB 
8B 
4B 
07 


foff 
I on 
joff 
\on 


73 
7B 
63 

6B 


Rewind Unload 
Erase Gap 
Write Tape Mark 
Backspace Block 
Backspace File 
Forward Space Block 


OF 
17 
IF 
27 
2F 
37 


800 I "" ^ off 
[ even off 


off 
foff 
\on 
foff 


93 
B3 
BB 
A3 
AB 


Forward Space File 


3F 


Set Mode 2 (9-track) 

1600 bpi 

800 bpi t 




C3 
CB 



* Two-channel switch required + Special feature for NRZI operation 



DIRECT ACCESS DEVICES 



Source: GA26-1592 for 3830/3330 

GA26-I589 for 2835/2305 

GA26-3599,GA26-1606 for 2314,2319 



Command 


MT Off 


MT On* 


Count 


Control 


Orient (c) 


2B 




Nonzero 




Recalibrate 


13 




Nonzero 




Seek 


07 




6 




Seek cylinder 


OB 




6 




Seek Head 


IB 




6 




Space Count 


OF 




3 (a); nonzero (d) 




Set File Mask 


IF 




1 




Set Sector (a) 


23 




1 




Restore (a) 


17 




Nonzero 




Vary Sens ing (c) 


27 




1 




Diagnostic Load (a) 


53 




I 




Diagnostic Write (a) 


73 




512 


Search 


Home Address Equal 


39 


B9 


4 




Identifier Equal 


31 


Bl 


5 




Identifier High 


51 


Dl 


5 




Identifier Equal or High 


71 


Fl 


5 




Key Equal 


29 


A9 


KL 




Key High 


49 


C9 


KL 




Key Equal or High 


69 


E9 


KL 




Key and Data Equal (d) 


2D 


AD 








Key and Data High (d) 


4D 


CD 








Key and Data Equal or High(d) 


6D 


ED 






Continue 


Search Equal (d) 


25 


A5 




Number of bytes 
(incl. mask bytes) 
in search argument 


Scan 


Search High (d) 

Search High or Equal (d) 


45 
65 


C5 
E5 






Set Status Modifier (d) 


35 


B5 








Set Status Modifier (d) 


75 


F5 








No Status Modifier (d) 


55 


D5 






Read 


Home Address 


1A 


9A 


5 




Count 


12 


92 


8 




Record 


16 


96 


| 




Data 


06 


86 


1 Number of bytes 




Key and Data 


0E 


8E 


I to be transferred 




Count, Key and Data 


IE 


9E 


[ 




IPL 


02 




J 




Sector (a) 


22 




1 


Sense 


Sense I/O 


04 




24 (a); 6 (d) 




Read, Reset Buffered Log (b) 


A4 




24 




Read Buffered Log (c) 


24 




128 




Device Release (e) 


94 




24 (a); 6(d) 




Device Reserve (e) 


B4 




24 (a); 6 (d) 




Read Diagnostic Status 1 (a) 


44 




16 or 512 


Write 


Home Address 


19 




5 




Record 


15 




8+ KL+ DL or R0 




Erase 


11 




8+ KL+ DL 




Count, Key and Data 


ID 




8+ KL+ DL 




Special Count, Key and Data 


01 




8+KL=DL 




Data 


05 




DL 




Key and Data 


0D 




KL+DL 



* Code same as MT Off except as listed 

a 3830/3330 and 2835/2305 only 

b 3830/3330 only c 2835/2305 only 



d 2314,2319 only 

e Channel attachment and 2-channel switch 
feature required;standard on 2314 with 2844 



HEXADECIMAL AND DECIMAL CONVERSION 



From Hex: Locate each hex digit in its corresponding column position and note the 
decimal equivalents. Add these to obtain the decimal value. 

From Dec: Locate the largest decimal value in the table that will fit into the decimal 
number to be converted. 

Note its hex equivalent and hex column position. 
Find the decimal remainder. 
Repeat the process on this and subsequent remainders. 







Hexadecimal Co! 


umns 






6 


5 


4 


3 


2 


1 


Hex Dec 


He» 


Dec 


Hex Dec 


Hex 


Dec 


Hex 


Dec 


Hex 


Dec 



































1 1 048 576 


1 


65536 


1 


4096 


1 


256 


1 


16 


1 


1 


2 2097152 


2 


131072 


2 


8192 


2 


512 


2 


32 


2 


2 


3 3145728 


3 


196608 


3 


12288 


3 


768 


3 


48 


3 


3 


4 4194304 


4 


262144 


4 


16384 


4 


1024 


4 


64 


4 


4 


5 5242880 


5 


327680 


5 


20480 


5 


1280 


5 


80 


5 


5 


6 6291456 


6 


393216 


6 


24576 


6 


1536 


6 


96 


6 


6 


7 7340032 


7 


458752 


7 


28672 


7 


1792 


7 


112 


7 


7 


8 8 388608 


8 


524288 


8 


32768 


8 


2048 


8 


128 


8 


8 


9 9437 184 


9 


589824 


9 


36864 


9 


2304 


9 


144 


9 


9 


A 10485760 


A 


655360 


A 


40960 


A 


2560 


A 


160 


A 


10 


B 11534336 


B 


720896 


B 


45056 


B 


2816 


B 


176 


B 


11 


C 12582912 


C 


786432 


C 


49152 


C 


3072 


C 


192 


C 


12 


D 13631488 


D 


851968 


D 


53248 


D 


3328 


D 


208 


D 


13 


E 14680064 


E 


917504 


E 


57344 


E 


3584 


E 


224 


E 


14 


F 15728640 


F 


983040 


F 


61440 


F 


3840 


F 


240 


F 


15 


123 


4567 


123 


4567 


123 


4567 


Byte 


Byte 


Byte 



POWERS OF 2 



POWERS OF 16 



2 n 


n 


256 


8 


512 


9 


1024 


10 


2048 


11 


4096 


12 


8 192 


13 


16384 


14 


32768 


15 


65536 


16 


131072 


17 


262144 


18 


524288 


19 


1048 576 


20 


2097152 


21 


4194304 


22 


8388608 


23 


16777216 


24 



16" 


n 


1 





16 


1 


256 


2 


4096 


3 


65536 


4 


1048576 


5 


16777216 


6 


268435456 


7 


4294967296 


8 


68719476736 


9 


1099511627776 


10 


17592186044416 


11 


281474976710656 


12 


4503599627370496 


13 


72057594037927936 


14 


1152921504606846976 


15 



SENSE INFORMATION SUMMARY 

1017 - Paper Tape Reader 

Sense Byte Designatior 



1287 - Optical Reader 



BitO : command reject 

1 : intervention reject 

2 : bus-out check 
3:- 

4 : data check 



1018 - Paper Tape Punch 

Sense Byte Designatic 



BitO : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 
5: - 

6: - 



Designatior 



BitO : command reject 

1 : intervention required 

2 .- bus-out check 

3 : equipment check 

4 : data check 

6 : non-recovery 

7 : keyboard correction (tape only) 

BitO : tape mode 

1 : late stacker select 

2 : no document found 
3: - 

4 : invalid operation 



SENSE INFORMATION SUMMARY (...Continued) 



1288 -Optical Reader 
Sense Byte 



: command reject 

1 : intervention requin 

2 : bus -out check 

3 : equipment check 

4 : data check 

5 : c 
6: n 
7: - 



end-of-page 

no document found 



Sense Byte 



: command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

5 : parity check (UCS storage) 
6: - 

7 : channel 9 



: chain interlock 

: forms check 

: coil protect check 

: subscan ring check 

: chain buffer address register check 






hammer on check 



Not used 


Bit 




1 


hammer reset failure check 
no fire check 




2 


misfire check 




3 


print data buffer parity check 




4 


check bit buffer parity check 




5 


chain buffer parity check 




6 


buffer address register parity check 




7 


clock check 



SENSE INFORMATION SUMMARY (...Continued) 

1403 - Printer (. . .Continued) 

Sense Byte Designation 



5 



1419 - PCU - MICR 



1419 - SCU - MICR 



1-7: 



: command reject 
: intervention requin 
: bus-out check 

: data check 
: overrun 
: autoselect 



: document under read head 

: amount field valid 

: process-control field valid 

: account-number field valid 

: transit field valid 

: serial-number field valid 



: command reject 

: intervention required 

: bus-out check 



5 : late stacker select 

6 : autoselect 

7 : operator attention 



1442 - Card Read-Punch / Card Punch 



: command reject 
: intervention requin 
: bus-out check 
: equipment check 
: data check 
: overrun 



SENSE INFORMATION SUMMARY (. . .Continued) 



Sense Byte 



2260 - Display Statior 
Sense Byte 



2311 - Disk Storage 



: command reject 

: intervention required 

: bus-out check 

: equipment check 

: type bar 

: type bar 



: command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 



Designation 

Bit : command reject 

1 : intervention required 

2 : bus -out check 

3 : equipment check 

4 : data check 

5 : overrun 

6 : track condition check 

7 : seek check 

Bit : data check in count area 

1 .- track overrun 

2 : end of cylinder 

3 : invalid sequence 

4 : no record found 

5 : file protect 

6 : missing address marker 

7 : overflow incomplete 

Bit : unsafe 

1 :- 

2 : serial izer check 
3: - 

4 : ALU check 

5 : unselected file status 



SENSE INFORMATION SUMMARY (. . . Continued) 

231 1 - Disk Storage (. . . Continued) 

Sense Byte Designation 

3 Bit : ready 

1 : on line 

2 : unsafe 
3: - 

4 : on line 

5 : end of cylinder 
6: - 

7 : seek incomplete 

4 Bit 0-7: - 



Bit 0-7: command in progress when overflow 
incomplete occurs 



2314/2319 - Direct Access Storage 

Sense Byte Designation 



Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 



6 : track condition check 

7 : seek check 

Bit : data check in count area 

1 : track overrun 

2 : end of cylinder 

3 : invalid sequence 

4 : no record found 

5 : file protect 

6 : missing address marker 

7 : overflow incomplete 

Bit : unsafe 
1: - 

2 : SERDES check 
3: - 

4 : ALU check 

5 : unselected status 



SENSE INFORMATION SUMMARY (...Continued) 



2314/2319 - Direct Access S 


orage 


Sense Byte 
3 


Designation 

Bit : busy 

1 : on line 

2 : unsafe 

3 : wr current sense 

4 : pack change 

5 : end of cylinder 

6 : multi-module select 

7 : seek incomplete 



Bit : wrong length record (2314 with 
multiplex storage control feature 
only) 
1 : pending status (2314 with multiplex 

storage control feature only) 
2: 



4-7 



: - 






: Module indentificatic 




bits 4567 


phys 


cal drive 


0000 




A 


0001 




B 


0010 




C 


0011 




D 


0100 




E 


0101 




F 


0110 




G 


0111 




H 


1000 




J 


1111 


module not def 



2321 - Data Cell 



Bit 0-7: command in progress when overflow 
incomplete occurs. 



: command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

5 : overrun 

6 : track condition check 

7 : seek check 



SENSE INFORMATION SUMMARY (...Continued) 

2321 - Data Cell (. . .Continued) 

Sense Byte Designation 

1 Bit : data check in count area 

1 : track overrun 

2 : end of cylinder 

3 : invalid sequence 

4 : no record found 

5 : file protect 

6 : missing address marker 

7 : overflow incomplete 

2 Bit : unsafe 

1 : - 

2 : serializer check 
3: - 

4 : ALU check 
5 : unselected file status 
6: - 
! 7: " 

3 Bit : drive ready 

1 : drive operative 

2 : read safety 

3 : write safety 

4 : strip ready 

5 : invalid address 

6 : auto restore 

7: CE cell located 

4 Bit 0-7:- 

5 Bit 0-7:command in progress when overflow 

incomplete occurs 



2400 - Magnetic Tape 



Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

5 : overrun 

6 : word count zero 

7 : data converter check 



SENSE INFORMATION SUMMARY (. . . Continued) 

2400 - Magnetic Tope (.. .Continued) 

Sense Byte Designation 



2495 - Tope Cartridge Reader 
Sense Byte 



Bit : noise 

1-2 : B'OO' =not existent 
B'01 ' = not ready 
B' 10' = ready and not rewinding 
B'll" = ready and rewinding 

3 : seven-track 

4 : at loadpoint 

5 : selected and write status 

6 : file protect 
7 : not capable 



Bit 0-7:confains the track-in-error indicator 
bits that are set at the end of a read, 
or read-backward command if a data 
check has been encountered. Bits 6 
and 7 on together indicate either more 
than one error or no error found . 

Bit O.-R/WVRC 

1 : LRCR 

2 : skew 

3 .• CRC 

4 : skew register VRC 

5 : phase encoding 

6 : backward 

7 : C compare 

Bit : echo check 

1 : reject TU 

2 : read clock error 

3 : write clock error 

4 : delay counter 

5 : sequence indicator C 

6 : sequence indicator B 

7 : sequence indicator A 



: command refect 

1 : intervention required 

2 : bus-out check 

3 : equipment check 
4 : data check 

5 : should-nof-occur 

6 : position check 

7 : should-not-occur 



SENSE INFORMATION SUMMARY (. . .Continued) 

2501 - Card Reader 

Sense Byte Designation 



: command reject 

: intervention required 

: bus-out check 

: equipment check 

: data check 

: overrun 



2520 - Card Read-Punch/Card Punch 



Bit 


0: 
1 : 


: command reject 
intervention required 




2: 


; bus -out check 




3: 


: equipment check 




4: 


data check 




5 : 


: overrun 




6: 


- 




7: 


- 



2540 - Card Reader/Card Punch 



Bit 


0: 
1 : 


; command reject 

: intervention required 




2: 


: bus-out check 




3 : 


: equipment check 




4: 


: data check 




5: 


: - 




6: 


unusual command 




7: 


: - 



2560 - Multifunction Card Machine 



: command reject 

1 : intervention required 
2: - 

3 : equipment check 

4 : data check 

5 : feed/machine check 

6 : no card available 

7 : print operation in progress 



SENSE INFORMATION SUMMARY (. ■ . Continued) 



2560 - Multifunction Card Machine (. . .Continued) 
Sense Byte Designation 

1 Bit : cover interlock/punch pusher check 

1 : [am bar check 

2 : corner station check 

3 : call 8 to 9 feed check 

4 : print station feed check 

5 : punch station feed check 

6 : read station feed check 

7 : input station feed check 



Location of individual card : 
Bit : secondary select 

1 : card in punch station 

2 : preprint SC7 exposed 

3 : prepunch SC5 exposed 

4 : prepunch SC4 exposed 

5 : preread SC 3 exposed 

6 : preread SC2 exposed 

7 : input station SCI exposed 



Stacker Select Information 
Bit : primary card 

1 : binary value 4 

2 : binary value 2 

3 : binary value 1 

4 : secondary card 1 

5 : binary value 4 
6 : binary value 2 
7 : binary value 1 



Stacker Select Informatic 
Bit : primary (0) 

secondary (1) 

1 : binary value 4 

2 : binary value 2 

3 : binary value 1 

4 : primary (0) 

secondary (1) 

5 : binary value 4 

6 : binary value 2 

7 : binary value 1 



card at primary 
prepunch station 



card at secondary 
prepunch station 



card at punch c 
preprint station 



card after print 
station 



SENSE INFORMATION SUMMARY (. . .Continued) 



2560 - Multifunction Card Machine (. . .Continued) 



Sense Byte 



Stacker Select Information : 
Bit : primary (0) 

secondary (1) 



: primary (0) 
secondary (1) 



7: I 



card at comer station 



card in stacker pocket 
(was just stacked) 



Card column in which first (possibly only) 

error was detected : 

Bit : multi data check 

1 : binary value 64 

2 : binary value 32 

3 : binary value 16 

4 : binary value 8 

5 : binary value 4 

6 : binary value 2 

7 : binary value 1 



2596 - Card Read-Punch 



Sense Byte 



Bit : command 



iject 

intervention requin 
bus-out check 
equipment check 
data check 
overrun 



2671 - Paper Tape Reader 



Designation 

Bit : command reject 

1 : intervention required 

2 : bus -out check 

3 : equipment check 

4 : data check 



SENSE INFORMATION SUMMARY (...Continued) 



Bit : command refect 

1 : intervention required 
2: - 

3 : equipment check 

4 : data check 

5 : chain buffer parity check 
6 : no channel found 

7 : channel 9 



: interlock (chain gate open) 

1 : form check (jam) 

2 : coil protect check 

3 : subscan ring check 

4 : chain buffer address register check 

5 : hammer unit shift check (model 1 only) 

6 : any hammer on check 

7 : device ready check 



rriage inhibit check 



step check 
move check 



: hammer reset failure check 

1 : no fire check 

2 : misfire check 

3 : print data buffer parity check 

4 : check bit buffer parity check 

5 : chain buffer parity check 

6 : buffer address register check 

7 : clock check 



Bit : open coil check 



SENSE INFORMATION SUMMARY (■ . .Continued) 
3203-4 - Printer 

Sense Byte Designotion 



Bit : command reject 

1 : intervention required 
2:- 

3 : equipment check 

4 : data check 

5 : buffer parity check 

6: load check (load FCB/UCSB) 
7 : channel 9 

Bit : command retry 
1 : print check 
2: - 

3 : line position check 

4 : forms check 

5 : command suppress 

6 : controller check 



Bit : carriage failed to move 
1 : carriage motion check 
2: - 
3: - 
4: - 

5 : forms jam 
6: - 

7 : train velocity 

Bit : USCB parity 
1 : PLB parity 
2: - 

3 : coil protect 

4 : hammer fire check 
5: - 

6 : sync check 



Bit 0-7: always X'84', 

Device ID 3203-4 
Printer Subsystem 



Bytes 5-23 contain Att. and device specific 
information, (pis. refer to MLM) 



3210/3215 - Console Printer Keyboard 

Sense Byte Designatio 



Bit : command reject 

1 : intervention required 
2: - 

3 : equipment check 
4-7: - 



SENSE INFORMATION SUMMARY (...Continued) 
3211 - Printer 



: command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

5 : buffer parity check 

6 : load check 

7 : channel 9 



Bit : command parity 

1 : print check 

2 : print quality 

3 : line position check 

4 : forms check 

5 : command suppress 

6 : mechanical motion 
7: - 

Bit : carriage failed to move 

1 : carriage sequence check 

2 : carriage stop 

3 : platen failed to advance 

4 : platen failed to retract 

5 : forms jam 

6 : ribbon motion 

7 : train overload 
Bit : UCSB parity 

1 : PLB parity 

2 : FCB parity 

3 : coil protect 

4 : hammer fire check 

5 : service aid 

6 : UCSAR sync check 

7 : PSE sync check 

Bit 0-7 : information used by service personnel 
Bit 0-7:- 



3272 - (3270 Local) 

Sense Byte Designation 

Bit : command reject 

1 : intervention required 

2 : bus out check 

3 : equipment check 

4 : data check 

5 : unit specify 

6 : control check 

7 : operation check 
3330 - Disk Storage 

Sense Byte Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

5 : overrun 
6: - 

7: - 



SENSE INFORMATION SUMMARY ( . . . Continued) 



3330 - Disk Storage (. . .Continued) 



: permanent error 

1 : invalid track format 

2 : end of cylinder 
3: - 

4 : no record found 

5 : file protected 

6 : write inhibited 

7 : operation incomplete 



correctable 
environmental data present 



Bit 0-7: restart command 

Bit 0-l:storage control identification 
2-7:physical drive identification 
bits 2 to 7 physical driv e ' 



1 1 1000 


A 


110001 


B 


101010 


c 


100011 


D 


011100 


E 


010101 


F 


001110 


G 


000111 


H 



it 0-7:identify the eight low-order bits of 

the cylinder address in the most recent 
seek argument 



1 : cylinder number (high order bit of 

cylinder address) 

2 : difference 



5: 4 ) 
6: 2 ) 
7: 1 ) 



Bit 0-3:format type of remaining sense bytes (8-23) 
4-7 : encoded error message 



Meaning depends on format type 



SENSE INFORMATION SUMMARY (...Continued) 



3340 - Disk Storage 




Sense Byte 


Designation 





Bit : command reject 




1 : intervention required 




2 : bus-out check 




3 : equipment check 




4 : data check 




5 : overrun 




6 : track condition check 




7 : seek check 


1 


Bit : permanent error 




1 : invalid track format 




2 : end of cylinder 




3 : - 




4 : no record found 




5 : file protected 




6 : write inhibited 




7 : operation incomplete 


2 


Bit : RPS feature present 




1 : correctable 




2 :- 




3 : environmental data present 




4 :- 




5 :- 




6 : data module size) 01 = 35MB 




7 : data module size) 10 = 70MB 


3 


Bit 0-7: restart command 


4 


Physical drive identification : 




Bit : drive A 




1 : drive B 




2 : drive C 




3 : drive D 




4 : drive E 




5 : drive F 




6 : drive G 



Bit 0-7: Identifies the eight low-order bits of the 
cylinder address in the most recent seek 
argument 

Bit 0-2: identifies the three high-order bits of the 
cylinder address 
3 :- 

4:8 ) 

, \ _ . head number 

7:'l ) 



SENSE INFORMATION SUMMARY (...Continued) 

3340 - Disk Storage (. . .Continued) 

Sense Byte Designation 

7 Bit 0-3: format type of remaining sense bytes 

(8-23) 
4-7: encoded error message 

8-23 Meaning depends on format type 

3344 - DIRECT ACCESS STORAGE (3340 Mode) 

Sense Byte Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 



6 : track condition check 

7 : seek check 

Bit : permanent error 

1 : invalid track format 

2 : end of cylinder 

3 :- 

4 : no record found 

5 : file protected 

6 : write inhibited 

7 : operation incomplete 

Bit : RPS feature present 

1 : correctable 

2 :- 

3 : environmental data present 

4 : Compatibility Mode / 3344 

5 : HDA Size 3 Bit 

6 : HDA Size 2 Bit 

7 : HDA Size 1 Bit 

Bit 0-7: restart command 

Controller device address 
Bit : Controller Addr. Bit 2 
1 Controller Addr. Bit 1 

2: 1 

3 : > Controller Device Address 

4:J 

5 : Device Addr. Bit 4 

6 : Device Addr. Bit 2 

7 : Device Addr. Bit 1 

Bit 0-7: Identifies the eight low-order bits of the 
cylinder address 



SENSE INFORMATION SUMMARY (...Continued) 

3344 - DIRECT ACCESS STORAGE (3340 Mode) (...Continued) 

Sense Byte Designation 

6 Bit 0-3: identifies the four high-order bits of the 

cylinder address 

: 1024 

1 : 512 

2 : 256 

3 : 2048 

4 :8 ) 

" . head number 

6:2 ) 

7 :1 ) 



Bit 0-3: format type of remaining sense bytes 
(8-23) 
4-7: encoded error message 

Meaning depends on format type 



3350 - Direct Access Storage 

Sense Byte Designatic 



Bit : command reject 

1 : intervention required 

2 : channel bus out parity 

3 : equipment check 

5 : not used 
7 : not used 

Bit : permanent error 

1 : invalid track format 

2 :end of cylinder 

3 : not used 

4 : no record found 

5 : file protected 

6 : write inhibited 

7 : operation incomplete 

Bit : not used 

1 : correctable 

2 : not used 

3 : environmental data present 

4 : computibility mode 

5 : not used 

6 : not used 

7 : not used 

Bit 0-7 : restart command 



SENSE INFORMATION SUMMARY (...Continued) 
3350 - Direct Access Storage (. . .Continued) 



Sense Byte 



Designatio 



Bit 0-7: physical drive identificatio 
Bit :physical drive 



Bit - 7 : low order logical cylinder address 
Bit : Value 
: 128 



1 



Bit - 2 : identifies the three high-order bits of 

the cylinder address 
Bit 0: CE Cylinder 
1:3330-11 =512 
3330 - 1 = 256 

2:3330-11=256 
3330 -1=0 

3:16 ) 

4: 8 ) 

5:4) Head number 

6: 2 ) 

7: 1 ) 

Bit - 3 : FORMAT TYPE of remaining sense 
bytes (8 - 23) 

Meaning depends on format type (see 3350 MLM) 



SENSE INFORMATION SUMMARY (...Continued) 

3410/3411 - Magnetic Tope 

Sense Byte Designation 



and reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 

6 : word count zero 

7 : data converter check 



1-2 : B'00' = non-existent 
B'01 ' = not ready 
B'10' = ready and not busy 
B'll 1 = ready and busy 

3 : seven track 

4 :at load point 

5 : write status 

6 : File protected 

7 : not capable 

Bit 0-7: track in error bits 

Bit :VRC 

1 : multiple track error (PE ) or LRC (NRZI) 

3 : end data check (PE) or CRC (NRZI) 

4 : envelope check (PE only) 

5 : phase encoding 

6 : backword 

7 :- 

Bit : tape unit positioning check 

1 : tape unit reject 

2 : end of tape 

3 :- 

4 :- 

5 : diagnostic track check 

6 : tape unit check 

7 : illegal command 



SENSE INFORMATION SUMMARY (.. .Continued) 
3410/341 1 - Magnetic Tope (.. .Continued) 



Sense Byte 
5 



Designation 

Bit 0-1: new subsystem 

2 : write tape mark check 

3 : PE identification burst 

4 : PE compare 

5 : tachometer check 

6 : false end mark 
7: RPO 

Bit : seven track 

1 : short gap mode 

2 : dual density 
4-7 : tape unit model 

Bit : lamp check 

1 : left column check 

2 : right column check 

3 : ready reset 

4 : data security erase 
5-7: - 



end velocity check 
no read-back data 
start velocity check 



3420/3803 - Magnetic Tape 
Sense Byte 




Designation 

Bit : command reject 

1 : intervention required 

2 : bus -out check 

3 : equipment check 

4 -. data check 



6 : word count zero 

7 : data converter check 



SENSE INFORMATION SUMMARY (. . .Continued) 

3420/3803 - Magnetic Tope ( Continued) 
Sense Byte Designation 



Bit : noise 

1-2 : B'00' = non-existent 
B'01' = not ready 
B'10' = ready and not rewinding 
B'll' = ready and rewinding 

3 : seven track 

4 : at load point 

5 : write status 

6 : file protected 

7 : not capable 

Bit 0-7:track in error bits 

Bit : VRC 

1 : multiple track error (PE) or LPC (NRZI) 
2 : skew 

3 : end data check (PE) or CRC (NRZI) 

4 : envelope check (PE only) 

5 : phase encoding 

6 : backward 

7 : C-compare 

Bit : ALU hardware error 

1 : reject tape unit 

2 : tape indicate 

3 : write trigger VRC 

4 : microprogram detected error 
5: LWR 

6 : tape unit check 
7:RPQ 

Bit : new subsystem 

1 : new subsystem 

2 : write tape mark check 

3 : PE ID burst check 

4 : start read check 

5 : partial record 

6 : excessive postable or tape mark 
7:RPO 

Bit : seven track 

1 : write current failure 

2 : dual density 

3 : NRZI density 
4-7 : tape unit model 

Bit : lamp failure 

1 : tape bottom left 

2 : tape bottom right 

3 : reset key 

4 : data security erase 

5 : erase head 

6 : air bearing pressure 

7 : load failure 



SENSE INFORMATION SUMMARY (...Continued) 

3420/3803 - Magnetic Tope (. . .Continued) 
Sense Byte Designation 



Bit : IBG drop while writing 

1 : feed through check 

2 : SDR counter 

3 : early begin readback check 

4 : early ending readback check 

5 : slow begin readback check 

6 : slow ending readback check 

7 : velocity retry/restart 

Bit : SDR counter 

1 : velocity change during write 
2-3 : SDR counter 
4: - 



7 : tape control reserved 

Bit : command status reject 

1 : - 

2 : control status reject 

3 : no block on record readback check 

4 : WTM not detected block 

5 : tachometer start fail 

6 : - 

7 : velocity check 

Bit : B bus parity error, ALU 1 

1 : - 

2 : low ROS parity/low IC/ parity 
on branch instr. 

3 : high IC/high ROS reg parity 

4 : micro program detected hardware error 

5 : D bus parity error, ALU1 
6: - 

7 : branch condition error, ALU2 

Bit : B bus parity error, ALU 2 

1 : - 

2 : low ROS parity/low IC/parity on branch instr. 

3 : high IC/BC/high ROS reg parity 

4 : microprogram detected hardware error 

5 : D bus parity error, ALU 2 
6:- 

7 : branch condition error, ALU 2 

Bit 0-l:tape control density 

2-7:tape control unique ID high 

Bit 0-7: tape control unique ID low 



SENSE INFORMATION SUMMARY (. . . Continued) 

3420/3803 - Mognetic Tope (. . .Continued) 

Sense Byte Designation 

15 Bit 0-7:tape unit unique ID 

16 Bit 0-7:tape unit unique ID 



Bit : two-channel switch 

1-3 : tape control device switch features 
4-7 : EC level of tape control 

Bit : Power check/air flow 
1-3:- 
4-7 : EC level of tape unit 

Bit : primed for device and tape unit 7 

1 : primed for device and tape unit 6 

2 : primed for device and tape unit 5 

3 : primed for device and tape unit 4 

4 : primed for device and tape unit 3 

5 : primed for device and tape unit 2 

6 : primed for device and tape unit 1 

7 : primed for device and tape unit 

Bit : primed for device and tape unit F 

1 : primed for device and tape un" 

2 : primed for device and tape un 

3 : primed for device and tape un 

4 : primed for device and tape un 

5 : primed for device and tape un 

6 : primed for device and tape un 

7 : primed for device and tape un 

Bit : load button depressed 

1 : left reel turning 

2 : right reel turning 

3 : tape present 

4 •. reels loaded 

5 : load rewind 

6 : load complete 
7 : load check 

Bits 0-7:FRU identifiers for tape control 

Bits 0-7: FRU identifiers for tape control 



SENSE INFORMATION SUMMARY 
3504/3505/3525 - Card I/O 



3540 - Diskette 



Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 
5: - 

6 : abnormal format reset 

7 : permanent error key 

Bit : permanent error 

1 : automatic retry 

2 : motion malfunction 

3 : retry after intervention complete 
4-7: - 

Used for diagnostic purposes only. 



Sense Byte Designation 

Bit : command reject 

1 : intervention required 

2 : bus -out check 

3 : equipment check 

4 : data check 
5-7: - 

1 Bit : permanent error 

1 : automatic retry 

2 : motion malfunction 

3 : retry after intervention complete 

4 : special record transferred 
5-7: - 

2 Used for diagnostic purposes only 

3 Bit 0-7:cylinder address in binary 

4 Bit 0-7:head address, must be binary zero 

5 Bit 0-7:record address in binary 



SENSE INFORMATION SUMMARY (...Continued) 

3881 - Optical Mark Reader 

Sense Byte Designation 

Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 



5: - 
6 : unu 
7: - 



kj I command sequent 



5 - Optical Character Reader 

Sense Byte Designation 



Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 
4: - 

5: - 

6 : non-initialized 

7 : RCP error 

Bit : - 

1 : mark check 

2 : invalid format 
3: - 

4 : incomplete scan 
5: - 

6 : non-recovery 



: command reject 

1 : intervention required 
2: - 

3 : equipment check 

4 : data check 

5 : chain buffer parity check 
6 : no channel found 

7 : channel 9 



SENSE INFORMATION SUMMARY (. . .Continued) 

5203 - Printer (. . .Continued) 

Sense Byte Designation 

1 Bit 0-7:- 



Bit : interlock (chain gate open) 

1 : forms check (jam) 

2 : coil protect check 

3 : subs can ring check 

4 : chain buffer address register check 

5 : hammer unit shift check 

6 : any-hammer-on check 

7 : thermal overload 

Bit 0-7:- 

Bit : hammer reset failure check 

1 : no fire check 

2 : misfire check 

3 : print data buffer parity check 

4 : check bit buffer parity check 

5 : chain buffer parity check 

6 : buffer address register check 
7 : clock check 

Bit : open coil check 
1-7: - 



5425 - Multifunction Card Unit 



Sense Byte Designation 



Bit : command reject 

1 : intervention required 

2 : bus-out check 

3 : equipment check 

4 : data check 
5: - 

6 : no card available 
7:- 

Bit : read check 
1 : punch check 
2: - 

3 : print data check 

4 : print clutch check 

5 : hopper check 

6 : feed check 



SENSE INFORMATION SUMMARY (...Continued) 
5425 - Multifunction Cord Unit (. . .Continued) 



1 : - 

2 : card in primary wait station 

3 : card in secondary wait station 

4 : NPRO allowed 

5 : hopper cycle not complete 

6 : card in transport counter bit 2 

7 : card in transport counter bit 1 

Contains a hexadecimal number whose 
value can represent feedchecks and 
emitter checks in the 5425 

Defines the card column group and tier 
where the error was detected which caused 
the first read check or punch check of a 
card cycle : 
Bit : multiple error 
1-2 : B'OO' Tier 1 

B'OT Tier 2 

B'10' Tier 3 
3-7 : B'00000' column group 1 

B'00001' column group 2 

B'iiiil' column group 32 

Bit : D row miscompare 

1 : C row miscompare 

2 : B row miscompare 

3 : A row miscompare 

4 : 8 row miscompare 

5 : 4 row miscompare 

6 : 2 row miscompare 

7 : 1 row miscompare 

Forms a table of the five most recent common 
Bit : Secondary 

1 : print four lines 

2: stacker select M2 

3 : stacker select M3 

4 : punch 

5 : feed command sample 

7 : read 



SENSE INFORMATION SUMMARY (. . .Continued) 
DOC - Display Operator Console 

Sense byte Designation 

Bit : command reject 

1 : intervention required 

2: - 

3 : equipment check 

4: - 

5: - 

6: - 

7 : operation check 



CHAPTER II 

DOS/VS GENERAL INFORMATION 



IPL CONTROL STATEMENTS 



Operation 


Operand 


Remarks 


ADD 


X'cuu'[(k)],devicetyper,X'ss' ] 


Add a device to the PUB table. 




LX'ssss' 


X'cuu': Channel and unit number 




[,X'ssssss'J 


(k): Can be specified as either 
(S) or a decimal number 
from to 255. 
(S) indicates that the de- 
vice can be switched (that 
is, physically attached to 
two adjacent channels). 
The designated channel is 
the lower of the two chan- 
nels. 

(0)-(255) indicates the 
priority of a device that 
cannot be switched, with 
indicating the highest pri- 
ority. If (k) is not given, 
the assumed priority is 255 

device actual device (See device 
type: codes list) 

X'ss' device specification (See 
X'ssss' ASSGN statement). If 
X'ssssss': absent the following values 
are assigned: 
X'CO' for 9-track tapes 
X'90' for 7-track tapes 
X'OO' for nontapes. 
X'00',X'0r, X'02' and 
X'03'are invalid as X'ss' 
for magnetic tape. 

X'ss' specifies SADxxx 
(Set ADdress) requirements 
for IBM 2702 lines: 
X'00' for SADO 
X'OT for SAD! 
X'02' for SAD2 
X'03' for SAD3 

X'ss' is required for MICR/ 
OCR device types. It spe- 
cifies the external inter- 
rupt bit in the old PSW, 
which is used by this device 
to indicate "read complete' 
The specifications are: 
X'Ol' PSW bit 31 
X'02' PSW bit 30 
X'04' PSW bit 29 
X'08' PSW bit 28 
X'10' PSW bit 27 
X'20' PSW bit 26 



IPL CONTROL STATEMENTS (. . . .Cont'd) 



Operation 


Operand 


Remarks 


ADD 
(Cont'd) 




The X'ss' parameter specifies whether 
or not the error correction feature is 
present on an IBM 1018 Paper Tape 
Punch with 2826 Control Unit. These 
specifications are: 
X'OG" No error correction feature 
X'01' Error correction feature 

For the ICA of theM 115/125, X'ss' 
X'ssss' or X'ssssss' is used to specify 
the line mode setting for a Start/Stop 
line or a BSC line. This is not accept- 
ed on the ASSGN statement. 
If a one or two byte value is specified 
the specified value is right-Justified 
and the rest of the three bytes is filled 
with zeros. 

Note: Optional statement; if required 
it must be entered before SET command 


CAT 


UNIT=X'cuu' 


Assigns the system logical unit SYSCA7 
X'cuu': Indicates the hexadecimal 
channel (c) and unit (uu) 
number of the device that is 
to contain the VSAM 
master catalog. 

Note: Optional statement; if required 
the CAT command must follow the SET 
command and precede the DPD com'd. 


DEL 


X'cuu' 


Delete a device from the PUB table. 
X'cuu': Channel and unit number. 

Note: Optional statement; if required 
it must be entered before SET command 


DPD 


[TYPE=M][,UNIT= X'cuu', 
CYL= xxx][, VOLID= xxxxxx] 


Defines the page data set. 
TYPE=N: Indicates that the page 
data set need not be for- 
matted and the extent 
limits have not been 
changed. 
If TYPE= N is specified but the page 
data set does not exist or the extent 
limits have been changed, TYPE= N 
is ignored and the page data set is 
formatted during IPL. In this case, the 
UNIT and CYL operands must either 
have been supplied during system ge- 
neration, or they must be specified in 
the DPD command. 



IPL CONTROL STATEMENTS (. . . .Cont'd) 



Operation 


Operand 


Remarks 


DPD 




TYPE= F indicates that the page data 


(Cont'd) 




set is to be formatted during IPL. For- 
matting during IPL is required if the 
page data set is to be extended or if 
it is to be reallocated. 

UNIT= X'cuu' specifies the channel 
and unit number of the 
device that is to contain 
the page data set. If 
UNIT is specified, CYL 
must also be specified. 

CYL= xxx : Specifies the sequential 
number of the cylinder, 
relative to zero, where 
the page data set is to 
begin. (The size of the 
page data set extent is 
cal culafed by the system) 
If CYLisspecified,UNlT 
must also be specified. 

VOLID=xxxxxx identifies the alpha- 
numeric volume serial no 
of the disk pack that con- 
tains the page data set. 
If this operand is omitted 
both during system gene- 
ration and in the DPD 
command, the volume 






serial number is not 
checked. 

Notes: Required statement. The DPD 
command must be the last command 
entered during IPL procedures. 

The operands of the DPD command may 
be given in any order. 


SET 


t DATE= valuel [, CLOCK =/alue2 ]] 


value 1: In one of the following 




[ ' ZONE= {wl} /hh/mm] 


formats: mm/dd/yy or 

dd/mm/yy, 

mm: month (01-12) 

dd : day (01-31) 

yy : year (00-99) 

value2: In the following format: 
hh/mm/ss, 
hh : hours (00-23) 
mm: minutes(00-59) 
ss : seconds(00-59) 

EAST: Specifies a geographical 
position east of Green- 
wich. 



IPL CONTROL STATEMENTS (... .Cont'd) 



Operation 


Operand 


Remarks 


SET 
(Cont'd) 




WEST: Specifies a geographical 
position west of Green- 
wich. 

hh/mm: A decimal value which 
indicates the difference 
in hours and minutes be- 
tween local and Green- 
wich Mean Time, 
hh : 0-12 
mm: 0-59 

Note: Required statement. If any ADD 
or DEL commands are required, they 
must precede the SET command. 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS 



.Nee 


Operation 


Operand Remarks 


Accepted 
by 




ALLOC 


Fl=nK [,F2=nlO 


Allocates foreground program 


JCC 






[,F3=nK] L\F4=nKj 


areas in the virtual address area. 
Value of n is an even number. 
The order of operands is 
arbitrary. At least one operand 

must be specified. 


AR 




ALLOCR 


(BGR=nK] [,FlR=nK] 
C,F2R=nK]C,F3R=nK] 
[,F4R=nK] 


Allocates real address area 
among foreground and back- 
ground programs. Value of n is 
an even number. The order of 
operands is arbitrary. At least 
one operand must be specified. 


JCC 




ALTER 


XXXXXX 


Alters 1 to 16 bytes of virtual 
storage. XXXXXX is the hex 
address where alteration is to 
start. 


AR 


[//] 


ASSGN 


For any device: 


For remarks see end of this 
statement 


JCS 


SYSxxx, 


X'cuu' ) 

UA 

IGN 


JCC 








jpERMJ 








'address-list) 










[ SYSyyy 










For disks: 


" X'cuu' ;' 
(address- list) 














SYSyyy 1 












DISK 


r dI 








SYSxxx, 


2311 
2314 
3330 
3330B 
3340 
I 3350 J 


[PERM! C v ° L=v ° lsern °Jr, SHR] 








For diskettes: 








f X'cuu' ") 








(address- list] 








SYSxxx, SYSyyy UJEMP 








DISKETTE L PERM J 








[3540 J 








For tapes: 










X'cuu' 












(address- list) 












SYSyyy 












TAPE 










SYSxxx, 


2400T7 
2400T9 
3410T7 
3410T9 
3420T7 
3420T9 


[S'][:^]r.vo^voue^ 





JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (■ . . .Cont'd) 



Accepted 
by 



ASSGN 
(Cont'd) 



X'cuu' 

(address- list) 

SYSyyy 

PRINTER 

PRT 1 

1403 

1403U 

1443 

3203 

3211 

5203 

5203U 



For cord (read) punches: 



For remarks see 

end of this statement 



[TEMPI 
[PERMj 

See Note 



X'cuu' 

(address-list) 

SYSyyy 

PUNCH 

1442N1 

1442N2 

2520B1 

2520B2 

2520B3 

2540P 

2560 
2596 
3525P 
3525RP 



M 



.f,TEMP] 

Lperm] 



For card readers: 



(address- list) 

SYSyyy 

READER 

1442N1 

250! 

2520B1 

2540R _ 

2560 

2596 
3504 
3505 
3525RP 

5425 






[7temp~| 
Lpermj 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (Contd). 



ASSGN 
(Cont'd) 



can be SYSRDR, SYSIPT, SYSIN, 
SYSPCH, SYSLST, SYSOUT, 
SYSLOG, SYSLNK, SYSREC, 
SYSRLB, SYSSLB, SYSCLB 

(JCConly,), or 
SYSOOO-SYSnnn. 

c=0-6. 

uu=00-FE (0-254)inhex 

a list of up to seven device 
addresses in the form: 
(XW,...,XW) 



unassign and ignore (invalid 
for SYSCLB, SYSRDR, SYSIPT, 
SYSIN) 



r programmer logical 



•class: READER, PRINTER, PUNCH, 

TAPE, DISK, or DISKETTE 



device code of any supported 


device 








density (magn.tape only) 




ss BPI 


Parity 


Trans 1. Conv. 
feat feat 


10 200 


odd 


off 


on 


20 200 


even 


off 


off 


28 200 


even 


on 


off 


30 200 


odd 


off 


off 


38 200 


odd 


on 


off 


50 556 


odd 


off 


on 


60 556 


even 


off 


off 


68 556 


even 


on 


off 


70 556 


odd 


off 


off 


78 556 


odd 


on 


off 


90 800 


odd 


off 


on 


A0 800 


even 


off 


off 


A8 800 


even 


on 


off 


B0 800 


odd 


off 


off 


B8 800 


odd 


on 


off 


CO 800 


sinqle 


dens 9 tr 




CO 1600 


single 


dens. 9 tr 




CO 1600 


dual 


dens. 9tr. 




C8 800 


dual 


dens. 9tr. 




DO 6250 


single 


dens. 9 tr 




DO 6250 


dual 


dens. 9tr. 





JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (. . . . Cont'd) 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 




ASSGN 
(Cont'd) 












ALT: 


specifies alternate tape unit. 
(Invalid for SYSIPT) 








HI: specifies input hopper 1 for input 
on 2560 or 5425; is assumed if 
neither HI nor H2 is specified. 










H2: specifies input hopper 2 for input 
on 2560 or 5425; 
(invalid for programmers units) 










PERM; the assignment is permanent 










TEMP: the assignment is temporary 










VOL=volserno : volume serial number of the tape 
or disk required. 










SHR: 
Note: 


indicates the shared option for disk 
devices I -1 
PRT 1 stands either for a 321 1 or 

a 3204-3 printer. (The 3203-4 j 

Printer cannot be assigned as 3203. )| 








BATCH 


M 


Start or continue processers 


AR 




CANCEL 


fl 


Cancels execution of current job 
in specified area 


AR 




CANCEL 


blank 


Cancels execution of current job 


JCC 


[//] 


CLOSE 


S 


YSxxx , 
LX'cuu'CX'ss'J 
,UA ] 
UGN [ 
},ALT J 




SYSxxx : for magnetic tape 
SYSPCH 
SYSLST 
SYSOUT 
SYSOOO-SYSnnn 


JCS 
JCC 








for DASD (JCC only) 

SYSIN 

SYSRDR 

SYSIPT 

SYSPCH 

SYSLST 
X'cuu', X'ss', UA, IGN, ALT: 
Values as described in ASSGN 
command . 





JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (. . . .Cont'd) 



Nome 


Operation 


Operand 


Remarks 


Accepted 
by 


// 


DATE 


mm/dd/yy or 
dd/mm/yy 


mm: month (01-12) 
dd : day (01-31) 
yy : year (00-99) 


JCS 


// 


DLAB 


'label Melds 1-3' C 
xxxx, yyddd, yyddd, 
'system code' [,type~] 


■label fields 1-3': first three 
fields of Format 1 DASD 
file label. Is a 5J-byte 
character string, contain- 
ed within apostrophes and 
following by a comma . 
Entire 51-byte field must 
be contained in the first 
of the two statements. 
Field 1 is the file name 
(44-byte alphameric); 
field 2 is the format iden- 
tifier (1-byte numeric); 
field 3 is the file serial 
number (6-byte alphameric) 

C: Any nonblanc character 
in column 72. 

xxxx: Volume sequence number 
(4-digit num. ) Must begin 
in column 16 of the con- 
tinuation statement. 
Columns 1-15 are blank. 

yyddd. File creation date follow- 

yyddd: ed by file expiration date. 
Each is 5-digit numeric. 

'system-code' : Not required. 

VJhen used, a 13-character- 
string within apostrophes. 

type: SD, DA, ISC or ISE. If om- 
itted, SD is assumed. 


JCS 


// 


DLBL 


filename, C'file-ID'], 
[date], [codes}, 
[,DSF ][,BUFSP=n] 
[,CAT=filename] 
(See Note 1) 


filename : One to seven alpha- 
meric characters, the 
first of which must be alp 
'file-ID': One to forty-four alpham 
characters (one to eight c 
meric characters for the 
diskette) 
date : One to six characters(yy/ 
codes : Two to four alphabetic cl 
ters(SD,DA,DU,ISC,ISE, 
DSF : specifies that a data secu 
file is to be created or pr 
BUFSP=n: specifies, for a VSAM file 
processed, the number of 
of virtual sforage(0-9999 
be allocated as bufferspa 
CAT=filename : specifies filename ( 
alphameric characters)of the DLBL s 
ment for the catalog owing this VSA 
BLKSIZE=n: a number from 1 to 32,; 
(only valid for SAM file 
3350 and 3330-11) 


JCS 




habetic 

Ipha- 
3540 

ddd) 
arac- 
VSAM) 
red 

to be 
byte's 
?9)to 
ce 

1 to 7 
ate- 
Mfile. 

68 
s on 





JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (■ ■ . .Cont'd) 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 




DSPLY 


XXXXXX 


Displays 16 bytes of virtual sto- 
rage 


AR 




DUMP 




blank 


Dumps specified areas of virtual 


AR 








S 




storage 










BG 


* 


.Parameter causes dump on the 










Fn 


|g! 


SYSLST assigned to the specified 










BGS 

FnS I - 




partition. Default is BG SYSLST. 










PDAREA \ 


blank: General registers plus 










.address, address) 


all real and virtual 










partitions currently 










occupied by programs 










S: General registers, all 










real and virtual parti 










tions currently occu- 










pied by programs, and 










supervisor area 










BG, Fn: applicable real or vir- 










tual partition current- 










ly occupied by progr. 










and associated regis- 










ters 










BGS,FnS: Applicable real or 










virtual partition cur- 










rently occupied, re- 










gisters and supervisor 










PDAREA : PD table, PD area and 










AAA 










address, Specified storage area 










address: between the two hexa- 










decimal addresses and 










associated registers 






DVCDN 


X'cuu' 


X'cuu': c= 0-6 

uu= 00-FE(0-254) in 


JCC 




DVCUP 


X'cuu' 


X'cuu' : c= 0-6 

uu= 00-FE(0-254) in 
hex 


JCC 




END or 


blank 


End of SYSLOG communications 


JCC 




ENTER 




END for the 3210 and 3215prin- 
ter keyboards 
ENTER for DOC 


AR 




ENDSD 


blank 


Terminates execution of SD aids 
program 


AR 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (....Cont'd) 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 


["//J 


EXEC 






JCC 

JCS 


] [UCPGM=J prognamej L",REALJ CSIZE^izejf 
\ PROC= procname [,OVJ 






PGM= progname : one to eight al- 
phameric characters. 
Used only if the pro- 
gram is in the core 
image library 

REAL: The respective program 
is to be executed in 
real mode 

SIZE=size: can be nK, AUTO, or 
(AUTO,nK) 
nK : size of area 

required 
AUTO : take program 

(AUTO,nK) : take 

program size plus 
nK 

PROC= procname : Name of cata- 
loged procedure to 
be retrieved. One to 
eight alphameric 
characters, the first 
of which must be 
alphabetic. 

OV: Indicates that overwrite 
statements follow EXEC 
statement 


// 


EXTENT 


[symbolic unit J, 
Cserial number], 
Ctypel, Csequence 
number], ^relative 
track ], Cnumber of 
tracks], Csplit 
cylinder track], 
LB = bins] 


symbolic unit : Six alphameric 
characters 

serial number : One to six alpha- 
meric characters 

type : One numeric cha- 

sequence One to three nume- 
number : ric characters 
relative track : One to five nume- 
ric characters 
number of One to five nume- 
tracks: ric characters 
split cylinder One or two nume- 
track : ric characters 
bins : One or two nume- 
ric characters 


JCS 




HOLD 


FN [,Fn ] ... 


Causes the assignments for the 
specified foreground partition(s) 
to remain in affect until the 
end of the next Job 


JCC 




IGNORE 


blank 


Ignore abnormal condition 


AR 
JCC 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (. . . .Cont'd) 



Nome 


Operation 


Operand 


Remarks 


Accepted 
by 


// 


JOB 


obname Caccounting 
'nformationH 


jobname: One to eight alpha- 
meric characters 
accounting information: One 
to sixteen characters 


JCS 


// 


LBLTYP 


/TAPEf(nn)]l 
[NSD(nn) / 


TAPE: Used when tape files 
requiring label infor- 
mation, are to be pro- 
cessed and no non -se- 
quential disk files are 
to be processed 

(nn): Optional and is present 
only for future expansion 
(ignored by job control) 

NSD: Nonsequential disk files 
are to be processed 

(nn): Largest number of ex- 
tents per single file 


JCS 




LFCB 


X'cuu ', phasename 
[, FORMS=xxxxJ 
[, LPI=n JL\ NULMSG1 


Causes the FCB of printer 
X'cuu" to be loaded 


AR 


C//J 


LISTIO 


SYS 




Causes listing of I/O assignment 


JCS 






PROG 




on SYSLST for JCS and SYSLOG 


JCC 






Fn 




for JCC 








ALL 












{ SYSxxx 












UNITS 












DOWN 












UA 












. X'cuu' 










LOG 


jlank 


Causes logging of job control 
statements on SYSLOG 


JCC 
AR 




LUCB 


X'cuu', phasename 
:, FOLDJCNOCHK] 
t TRAIN=xxxxxx3 
; NULMSGJ 


Causes the UCB of printer 
X'cuu' to be loaded 


AR 




MAP I 


>lank 


Causes a map of area in real and 
virtual storage to appear on 
SYSLOG 


JCC 
AR 




MODE 


IR 




AR 






CR 












CE, cuu 


, 1 T, xx,yj 
, D Z, xx,yH 

, N 










1 R 












STATUS 










"fBHH 


R V 


] 








Q 


T, E=eeeeJ C T= ttttj) 








thJ 


J 























JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (....Cont'd) 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 




MODE 
(Cont'd) 




Changes the mode of operation, 
changes the EFL threshold values 
and gives status information. 
Note: When HIR or ECC is speci- 
fied, at least one of the optional 

operands within these braces must 
be selected. TH is only valid for 
the Model 145 when ECC, C is 
specified with the MODE command 






MSG 


m 


Transfers control to message routine 


AR 


I//I 


MTC 


opcode, (SYSxxxl 
IX'cuu" J 
[,nnj 


opcode: 8SF, BSR, DSE, ERG, 

FSF, FSR, REW, RUN, 

orWTM 
SYSxxx: Any logical unit 
X'cuu': (only valid for JCC) 

c=0-6 uu=00-FE 

(in hex) 
nn: dec. number (01-99) 


JCS 
JCC 




NEWVOL 


m 


Indicates that a new volume has 
been mounted for the specified 
partition 


AR 




NOLOG 


blank 


Suppresses logging of [ob control 
statements on SYSLOG 


JCC 
AR 


// 


OPTION 


option 1 
C,o P tion2,...D 


option: can be any of the 
following 

LOG Log control state- 
ments on SYSLST 

NOLOG Suppress LOG 
option 

DUMP Dump registers, 

and temporary real 
or virtual partition 
on SYSLST in case 
of abnormal pro- 
gram end. 

PARTDUMP Dump registers, 

selected supervisor 
control blocks, and 
temporary real or 
virtual partition on 
SYSLST in case of 
abnormal program 
end. 

NODUMP Suppress DUMP or 
PARTDUMP option 

LINK Write output of 

language translator 
on SYSLNK for 
linkage editing 


JCS 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (... .Cont'd) 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 




OPTION 




NOLINK Suppress LINK 






(Cont'd) 




option 
DECK Output object 

module on SYSPCH 
NODECK Suppress DECK 

option 
EDECK Punch source macro 

definitions on 

SYSPCH 
NOEDECK Suppress EDECK 

option 
ALIGN Align constants and 

date areas on bound- 

NOALIGN Suppress ALIGN 

option 
LIST Output listing of 

source module on 

SYSLST 
NOLIST Suppress LIST option 
LISTX Output of object 

module on SYSLST 
SYM Produce symbol table 

or data division map 

on SYSLST 
NOSYM Suppress SYM option 
XREF Output symbolic 

cross-reference list 

on SYSLST 
NOXREF Suppress XREF 

option 
ERRS Output listing of 

all errors In 

source program on 

SYSLST 
NOERRS Suppress ERRS 

option 
RLD Output listing of 

RLD information 

on SYSLST 
NORLD Suppress RLD 

option 
ACANCEL Cancel job if 

attempt to assign 

device is un- 
successful 
NOACANCEL Await operator 

action if a device 

cannot be assigned 





JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (. . . .Cont'd) 



Operatio 



OPTION 
(Cont'd) 



Operand 



Accepted 
by 



48C 
60C 
SYSPARM=*s 



Catalog program or 
phase in core 
image library after 
completion of 
Linkage Editor run 

Causes all DASD 
or tape labels to 
be written on the 
standard label 
track 

Causes all DASD 
or tape labels to 
be written on the 
user label track 
Causes all DASD 
or tape labels to 
be written on the 
partition standard 
label track 
48 - character set 
60 - character set 



scifie 



ralu. 



ing speci 
for assembler system 
variable symbol and 
SYSPARM 
Causes assembler 
and ESERV program 
to retrieve non- 
edited macros and 
copy-books from 
D-sublibrcry and 
edited macros from 
the F-sublibrary of 
the source state- 
ment library. 
Causes assembler 
and ESERV program 
to retrieve non- 
edited macros from 
the E-sublibrary and 
edited macros from 
the E-sublibrary of 
the source state- 
ment library. 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (. . . .Cont'd) 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 


[//] 


OVEND 


[comments] 


Indicates end of overwrite state- 
ments for a cataloged procedure 


JCS 
JCC 


[//l 


PAUSE 


[comments] 


Causes pause immediately after pro- 
cessing this statement . PAUSE state- 
ment is always printed on SYSLOG. 
If no 3210,3215 or DOC is available 
the statement is ignored. 


JCS 
JCC 




PAUSE 


where n= I,2,3or4 


Causes pause at end of current job 
step or at end of job 


AR 




PRTY 


blank 

partition, partition 


Pn=BG,Fl,F2,F3orF4. Allows the 
operator to disp lay or change the 
priority of partitions 


AR 


[//] 


RESET 


[sys } 

J PROG I 

law 


Resets I/O device assignments 


JCS 
JCC 




ROD 


blank 


Causes all SDRcountersforallnon- 
te leprocess ing dev ices on the recor- 
der f i le on SYSREC to be updated from 
the SDR counters in main storage 


JCC 


// 


RSTRT 


SYSxxx,nnnn[,file- 
name] 


SYSxxx: Symbolic unit name of the 
device on which the check 
po in t re cords are stored . 
CanbeSYSOOO-SYSnnn 

nnn: four character identifica- 
tion of the checkpoint re- 
cord to be used for restart 

filename: symbolic name of the 

DASD file to be used for 
restarting 


JCS 




SET 


[ UPSI=valuel] 

[,LINECT=value2] 

[,RCLST=value3] 

[,RCPCH=value4] 

[,RF=value5] 

[,DATE=value6] 

[,HC=value7] 


value 1:0,1 or X 

value2:standard number of lines for 
output on each page of SYSLST 
value3: decimal number indicating 
minimum number of SYSLST disk re- 
cords remaining to be written before 
operator warning 


JCC 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (....Cont'd) 



Accepted 
by 



L\SVA= value 82 
[,SDL=value 9J 



decimal number indi- 
cating mimimum number 
of SYSPCH disk records 
remaining to be 
written before operator 
warning 

defines to the system 
the status of the recorder 
file (IJSYSREC)on 
SYSREC used by the 
RMSR feature 
pF _ /YES Wile exists 
\CREAT|-create f ile 
in one of the following 
formats: 

mm/dd/yy or dd/mny yy 
mm: month (01-12) 
dd : day (01-31) 
yy : year (00-99) 

fYES " 
HC={HO 

(.CREATEj 



YES: 



NO: 



hard-copy file 



No recording 
performed 
CREATE: Create a hard- 
copy file 
storage size in the format 
nK, nK for SVA and 
GETVIS area, respective! 
specify CREATE to have 
the system directory list 
(SDL) built in the SVA. 



M 



Same as BATCH 



blank 



Stops batched-job progr. processing 



filename, ['file-ID'], 
[date], [file serial 
number}, [Volume se- 
quence number], 
[file sequence number], 
[generation number] 
[version number] 



filename : One to seven alpha- 
meric characters, the 
first of which must be 
alphabetic 

file-ID': One to seventeen al- 
phameric characters 
One to six characters 
(yy/ddd or d-dddd) 



date: 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (■ ■ . .Cont'd) 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 




TLBL 
(Cont'd) 


Note: For ASCII file 
processing the fourth 
and fifth operands are 
called set identifier 
and file section 
number, respectively 


frjile serial number (EBCDIC): 1 

One to six alphameric charac-l 

\ tersl] \ 

Cset identifier (ASCII) : Six 

^alphameric characters] J 

[C volume sequence number "] 

{(EBCDIC)] I 

[[file section number (ASCII)DJ 

One to four numeric characters-J 

file sequence number : One to four 

numeric characters 
generation number : One to four 

numeric characters 

version number : One to two 

numeric characters 






TPBAL 


M 


n= number of partitions in which 
processing can be delayed(0, 1,2, .. 
number of partitions minus one). 
Allows the operator to display or 
alter the status of the Tele- 
processing Balancing function. 


AR 


// 


TPLAB 


Mabel fields 3-10' 


Mabel fields 3-10' : Indicated 
fields of the standard tape file 

label for either EBCDIC 
or ASCII. A49-byte 
character string, 
contained within 
apostrophes 


JCS 


// 


TPLAB 


'label fields 3-10 C 
label fields 11-13' 


'label fields 3-10' : same as above 
C : Any nonblanc character 

in column 72 
label fields 11-13' : 20 character 
direct continuation of 
the same character string 
begun with fields 3-10 
(no blanks, apostrophes 
or commas separating) 


JCS 




UCS 


SYSxxx, phasename 
CFOLDJ CBLOCKj 
CNULMSGD 


Causes the 240-character universal 
character set contained in the core 
image library phase specified by 
phasename to be loaded as buffer 
storage in the IBM 2821 CU. 
SYSxxx must be assigned to a 1403 
or 5203 Printer with the UCS 
feature. 


JCC 




UNBATCH 


blank 


Terminates foreground processing 


JCC 


// 


UPSI 


nnnnnnnn 


n : 0, 1 or X 


JCS 


// 


VOL 


SYSxxx, filename 


SYSxxx: Can be SYSOOO-SYSnnn 
filename: One to seven alpha- 
meric characters, the 
first of which must be 
alphabetic 


JCS 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (....Cont'd) 



Accepted 
by 



type, sequence, lower, 



serial no. , 



lower: 



pe: 1 for data area (no 

split cylinder) 
2 for overflow area 
(for indexed sequential 
file) 

4 for index area (for 
indexed sequential 
file) 

128 for data area 
(split cylinder) 

quence: sequence number of 

extent within multiex- 

tent file. Can be 

0-255 

Lower limit of extent 

in the form B.C C.C 

C 2 C 2 H 1 H 2 H 2 where: 
B.= for 2311 or 2314/ 

2319; 0-9 for 2321 
C ] C ] =00 for 231 lor 

2314/2319; 00-19 for 

2321 

C 2 C 2 C 2 = 000-199 for 

2321 or 23 14/23 19; 

000-009 for 2321 

H, = for 2311 or 2314/ 

2319; 0-4 for 2321 
H 2 H 2 = 00-09 for 2311; 

00-19 for 2321 or 2314/ 
2319 

Note that the last four 
strips of subcell 19 are 
reserved for alternate 
track for 2321 
Upper limit of extent 
in the same form as for 
lower limit. 
i.': 6-alphameric-charc- 
ter volume serial number 
contained within 
apostrophes 

Can be SYSOOO-SYSnnn 
for 2311 or 2314/2319; 
0-9 for 2321 



SYSx> 
B2: 



JOB CONTROL- AND ATTENTION ROUTINE COMMANDS (. . . .Cont'd) 



Name 


Operation 


Operand 


Remarks 


Accepted 
by 


// 


ZONE 


{g^}/"*- 


EAST: A geographical position 
east of Greenwich 

WEST: A geographical position 
west of Greenwich 

hh/mm: A decimal value which 
indicates difference in 
hours and minutes 
between local time and 
Greenwich Mean Time, 
hh may be in the range 
0-12; mm in the range 
0-59 


JCS 


/+ 


ignored 


L~ comments 3 


Indicates end of procedure 


JCS 


/* 


ignored 


ignored 


Columns 1 and 2 are the only 
columns checked 


JCS 


/& 


ignored 


CcommenrsH 


Columns 1 and 2 are the only 
columns checked. Comments 
appear on SYSLOG and SYSLST 
atEOJ 




* 




comments 


Column 2 must be blank 





Note 1: If the DLBL and EXTENT statements for a private core image library are in the 
input stream (that is, the information is not contained on the label cylinder), they must 
precede the ASSGN SYSCLB command. 



LINKAGE EDITOR CONTROL STATEMENTS 



Name Operation 



Operand 



Remarks 



name,origin[,NOAUTO] 
CSVA3CPBDYJ 



Symbolic name of the 
phase. One to eight 
alphameric characters 
Specifies the load ad- 
dress of the phase. 
Load address can be in 
one of the following 
formats: 

1) symbol Rphase)] 
[± relocation] 

2) *[+ relocation]!, 

3) S[+ relocation] J 

k addresses relative to 
begin of virtual partition 



5) +displacement "I til 

6) F +address / 

** absolute addresses 

Note: A phase is eligible for relo- 
cation by the relocating loader if 
ts origin is specified as a relative 
address (formats 1-4 above). 
However, if a phase is relative to 
another phase whose origin is speci- 
fied as an absolute address (formats 
5 or 6 above), none of the phases 
can be made relocatable during this 
linkage editor execution. Refer to 
ACTION statement for additional 
information about the relocating 
loader. 

NOAUTO: Indicates that the auto- 
matic library lookup (AUTOLINK) 
feature is suppressed for both the 
private- and system relocatable libs. 
SVA: Indicates that the phase is 
SVA~-eligible. 

PBDY: Indicates that the phase is to 
be I ink -edited on a page boundery. 



le ][,(nameli S t)] 



If both operands are omitted the 
object module to be included is 
assumed to be on SYSIPT 
If the first operand is present, the 
object module is assumed to be in 
either the private- or the system 
:locatable library 

If the first operand is omitted and 
the second operand is present, the 
object module to be included is 
assumed to be in the input stream 
(SYSLNK) 



LINKAGE EDITOR CONTROL STATEMENTS (. . . .Cont'd) 



Name 


Operation 


Operand 


Remarks 




INCLUDE 
(Cont'd) 




modulename: Symbolic name of the 
module as used when 
cataloged in the relo- 
catable library. It con- 
sists of one to eight al- 
phameric characters 

(namelist): The Linkage Editor con- 
structs a phase from 
only the control sec- 
tions specified. The 
namelist is in the fol- 
lowing format: 
(cs name 1 , cs name2 , . . ) 
Entries within the pa- 
rentheses are the names 
of the control sections 
that are used to consti- 
tute the phase 


blank 


ENTRY 


[entrypoint] 


entrypoint: Symbolic name of an 
entry point 
If the operand field is 
blank, the Linkage 
Editor uses as transfer 
address the first signi- 
ficant address provided 
in an END record en- 
countered during gene- 
ration of the first phase 


blank 


ACTION 


[.Cc.l] ^j 


Indicates Linkage Editor options: 

CLEAR: Indicates that the unused 
portion of the core image 
library will be set to 
binary zero before the 
beginning of the Linkage 
Editor function 

MAP: Indicates that SYSLST is 
available for diagnostic 
messages. In addition, 
a virtual storage map is 
printed on SYSLST 

NOMAP Indicates that SYSLST is 
not available when per- 
forming the linkedit 
function 

NOAUTO Indicates that the AUTO 
LINK function is to be 
suppressed 

CANCEL Cancels the job automa- 
tically if any of the 
errors 21001 through 
2J70I occur 



LINKAGE EDITOR CONTROL STATEMENTS (. . . .Cont'd) 



Operation 



ACTION 
(Cont'd) 



BG: Sets the end-of -supervisor ad- 
Fn dress used in Linkage Editor 
calculation to the beginning 
of the partition specified,plus 
the length of the label area 
and of the save area 
If none of these operands are 
present, the program is link- 
edited to execute in the vir- 
tual partition in which linkedit 
takes place, unless otherwise 
specified in the PHASE state- 
ment 

REL Indicates that the phase(s) 

produced during this exe- 
cution of the Linkage 
Editor is to be made relo- 
catable if possible. 
Refer to origin operand 
in PHASE statement 
Note: If support for the relocating 
loader was generated in the super- 
visor, ACTION REL is the default 

NOREL Indicates that the phase(s) 
produced during this exe- 
cution of the Linkage 
Editor is not to be made 
relocatable 
Note: If support for the relocating 
loader was not generated in the 
supervisor, ACTION NOREL is the 
default 



Maintenance Functio 



Function 


Unit 


Element 


Control Statements 


Catalog 


Core Image 
Library 


Phase 


// OPTION CATAL 

(Linkage Editor control statements and if 

in card form, the phase to be cataloged) 

/* 

// EXEC LNKEDT 


Relocatable 
Library 


Module 


// EXEC MAI NT 

CATALR modulename [,v,m ] 
(module to be cataloged) 


Source statem. 


Book 


// EXEC MAINT 

CATALS sublib.bookname [,v.m],c] ] 
(book to be cataloged ) 


Procedure 
Library 


Proce- 
dure 


// EXEC MAINT 

CAT ALP procedurename [,VM=v.m] 

[,EOP=yy][,DATA=^] 

(procedure to be cataloged) 
/+ (or delimiter as specified in EOP 
parameter) 


Delete 


Core Image 


Phase 


// EXEC MAINT 

DELETC phase 1 [.phase 2, ] 


Program 


// EXEC MAINT 

DELETC progl .ALL[,prog2.ALL, . . . .] 


Relocatable 


Module 


// EXEC MAINT 

DELETR module K,module2 / ] 


Program 


// EXEC MAINT 

DELETR progl .ALL[,prog2. ALL, .. . .] 


Library 


// EXEC MAINT 
DELETR ALL 


Source 

Statement 

Library 


Book 


// EXEC MAINT 

DELETSsub!ib.bookl[,sublib.book2,..] 


Sub 
Library 


// EXEC MAINT 
DELETSsublib.ALL 


Library 


// EXEC MAINT 
DELETS ALL 


Procedure 
Library 


Proce- 
dure 


// EXEC MAINT 

DELETP procedurename [,procedure- 
name2, 3 


Library 


// EXEC MAINT 
DELETP ALL 


Rename 


Core Image 


Phase 


// EXEC MAINT 

RENAMC oldname,newname[,oldname, 
newname, . . . .] 



LIBRARIAN (....Cont'd) 



Function 


Unit 


Element 


Control Statements 


Rename 


Relocatable 


Module 


// EXEC MAINT 


(Cont'd) 


Library 




RENAMR oldname,newname [,oldname, 
newname, . . . .] 


Source 


Book 


// EXEC MAINT 




Statement 




RENAMS sublib.oldname,sublib. new- 




Library 




name [,sublib.oldname,sublib. newname, 


Procedure 


Proce- 


// EXEC MAINT 




Library 


dure 


RENAMP oldname,newname[,oldname, 
newname,....] 


Update 


Source 


Book 


// EXEC MAINT 




Statement 




UPDATE sublib.bookname, [s. book 1 ], 








[v.m],[nn] 
) ADD, ) DEL, or ) REP statements as 
required with source statements to be 

)END [v.m],C]] 


Condense 


Core Image 


Library 


// EXEC MAINT 




Library 




CONDS CL 


Relocatable 


Library 


// JOB jobname 




Library 




// EXEC MAINT 
CONDS RL 


Source 


Library 


// EXEC MAINT 




Statement 




CONDS SL 




Library 






Procedure 


Library 


// EXEC MAINT 




Library 




CONDS PL 


Libraries 


All 


// EXEC MAINT 








CONDS CL, RL, SL, PL 


Set 


Libraries 


Any or 


// EXEC MAINT 


Parameter 




All 


CONDL lib=nnnnn[,lib=nnnnn[,lib= 


for 






nnnnn]] 


Automatic 






Notes: Values to be substituted for lib: 


Condense 






CL - Core image library 
RL - Relocatable library 
SL - Source statement library 
PL - Procedure library 

Values to be substituted for nnnnn: 
One to five decimal digits with a 
maximum value of 65536. 


Reallocation 


System 




// DLBL IJSYSRS,'DOS SYSTEM RESI- 
DENCE FILE' date, code 

// EXTENT SYSRES,balance of extent 
information 

// EXEC MAINT 

ALLOC CL=cylin(tracks) ,RL=cylin( 
tracks), SL=cylin(rracks), PL=cylin(tracks) 



• 8RARIAN(.... Cont'd) 



J Function 


Unit 


Element 


Control Statements 


Reallocation 
(Cont'd) 


System 
(Cont'd) 


Library 
(Cont'd) 


Notes: 

CL- Core image library 
RL - Relocatable library 
SL - Source ststement library 
PL - Procedure library 

Values to be substituted for 
cylin and track: Any integer 



Note: //JOB, /* and/& must be included where needed 
Service Functions 



Display Unit 


Element 


Control Statements 


Core Image 


Phase 


// EXEC CSERV 

DSPLY phase l[,phase2, . . . .] 


Program 


// EXEC CSERV 

DSPLY prog 1 .ALLC, P rog2. ALL, . . . .] 


Library 


// EXEC CSERV 
DSPLY ALL 


Directory 


// EXEC DSERV 

DSPLY CD or DSPLYS CD 


Phase(s) 
with 
Version 
and 

Modifica- 
tion Level 


In the standard position: 
// EXEC DSERV 

DSPLYCS] CD(phasename) or CD(phasename) 

In the nonstandard position or higher than DSERV in use: 


// EXEC DSERV 

DSPLYL S ] CD(phasename,nn) or CD(phasename ,nn) 


Relocatable 
Library 


Module 


// EXEC RSERV 

DSPLY module! [,module2, ... .] 


Program 


// EXEC RSERV 

DSPLY prog l.ALL[.prog2. ALL,....] 


Library 


//EXEC RSERV 
DSPLY ALL 


Directory 


// EXEC DSERV 

DSPLY RD or DSPLYS RD 


Statement 


Book 


// EXEC SSERV 

DSPLY sublib.bookl[.sublib.book2, . . . .] 


Sub library 


// EXEC SSERV 

DSPLY sublibl. ALL[,sublib2.ALL, . . . .] 


Library 


//EXEC SSERV 
DSPLY ALL 


Directory 


// EXEC DSERV 

DSPLY SD or DSPLYS SD 


Sublibrary 


// EXEC ESERV 
GENEND 
DSPLY E. book 1 (,E. book 2, ...) 



LIBRARIAN (....Cont'd) 



Display Unit 


Element 


Control Statements 


Procedure 


Procedure 


// EXEC PSERV 

DSPLY procedurenameI[,procedurename2, ] 


Library 


// EXEC PSERV 
DSPLY ALL 


Directory 


// EXEC DSERV 

DSPLY PD or DSPLYS PD 


Transient 
^Directory 


Directory 


// EXEC DSERV 

DSPLY TD or DSPLYS TD 


System 
Directory 


Directory 


// EXEC DSERV 


Directories 


All 


// EXEC DSERV 

DSPLY ALL or DSPLYS ALL 


Punch Unit 


Element 


Control Statements 


Core Image 


Phase 


// EXEC CSERV 

PUNCH phase l[,phase2,...] 


Program 


// EXEC CSERV 

PUNCH P rogI.ALL[,prog2.ALL, . . . .] 


Library 


// EXEC CSERV 
PUNCH ALL 


Relocatable 


Module 


// EXEC RSERV 

PUNCH modulel[,module2, . . . .] 


Program 


// EXEC RSERV 

PUNCH prog 1 . ALL[.prog2. ALL, . . . .] 


Library 


// EXEC RSERV 
PUNCH ALL 


Statement 
Library 


Book 


// EXEC SSERV 

PUNCH sub lib. book 1[, sub lib.book2,...][,CMPRSD] 


Sub library 


// EXEC SSERV 

PUNCH sublibl . ALL[,sublib2. ALL, . . . .][,CMPRSD] 


Library 


// EXEC SSERV 

PUNCH ALL[,CMPRSD] 


Sublibrary 


// EXEC ESERV 
GENEND 
PUNCH E.book 1 (,E.book 2, ...) 


Procedure 


Procedure 


// EXEC PSERV 

PUNCH procedurenamel[,procedurename2, ] 


Library 


// EXEC PSERV 
PUNCH ALL 


Display and 
Punch Unit 


Element 


Control Statements 


Core Image 
Library 


Phase 


// EXEC CSERV 

DSPCH phase 1 [,phase2, . . . .] 


Program 


// EXEC CSERV 

DSPCH progl.ALL[,prog2. ALL,....] 



Display and 
Punch Unit 


Element 


Control Statements 


Core image 

Library 

(Cont'd) 


Library 


// EXEC CSERV 
DSPCH ALL 


Relocatable 
Library 


Module 


// EXEC RSERV 

DSPCH module l[,module2, . . . .] 


Program 


// EXEC RSERV 

DSPCH prog l.ALL[,prog2. ALL, . . . .] 


Library 


// EXEC RSERV 
DSPCH ALL 


Source 

Statement 

Library 


Book 


// EXEC SSERV 

DSPCH sublib.bookl[,sublib.book2 / ...J[ / CMPRSD] 


Sub library 


// EXEC SSERV 

DSPCH sublibl . ALL[,sublib2. ALL, . . . .][,CMPRSD] 


Library 


// EXEC SSERV 

DSPCH ALL[,CMPRSD] 


Macro 
Sublibrary 


// EXEC ESERV 
GENEND 
DSPCH e. book 1 (,E.book 2, ...) 


Procedure 


Procedure 


// EXEC PSERV 

DSPCH procedurenamel[,procedurename2, . . . .] 


Library 


// EXEC PSERV 
DSPCH ALL 



Note: //JOB, /* and /& must be included where needed 
Copy Functions 



Copy Unit 


Element 


Control Statements 


Core Image 


Phase 


//ASSGNSYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks), RL=cylin(tracks) 

SL=cyl in(tracks), PL=cyl in(tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYC phase 1 [, phase2, . . . .] 


Program 


//ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(rracks),RL=cylin(tracks) 

SL=cylin(tracks), PL=cyl in (tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYC prog 1 . ALLL, prog2 . ALL, ... J 



LIBRARIAN (....Cont'd) 



Copy Unit 


Element 


Control Statements 


Core Image 
(Cont'd) 


Library 


//ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks), RL=cylin (tracks) 

SL=cylm(tracks),PL=cylin(tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYC ALL 


Library 


//ASSGN SYS002, X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks), RL=cylin(tracks) 

SL=cylin(tracks), PL=cylin(tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYC NEW 


Relocatable 
Library 


Module 


//ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks), RL=cylin(tracks) 

SL=cyl in (tracks) , PL=cyl in (tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYR module l[,module2, . . . .] 


Program 


//ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cyl in (tracks), RL=cylin(tracks) 

SL=cyl in(tracks) , PL=cyl in (tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYR prog 1 . ALL[,prog2. ALL, . . . .] 




//ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks),RL=cylin(tracks) 

SL=cylin(tracks), PL=cylin(tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYR ALL 



LIBRARIAN (....Cont'd) 



Copy Unit 


Element 


Control Statements 


Reloctable 

Library 

Cont'd 




//ASSGN SYS002, X'cuu' 

//DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracb), RL=cylin(tracks) 

SL=cylin(tracks), PL=cylin(tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT. 

COPYRNEW 


Source 

Statement 

Library 


Book 


//ASSGN SYS002,X , cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks),RL=cylin(rracks) 

SL=cyl in (tracks), PL=cyl in (tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYS sublib.bookl[,sublib.book2, . . . .] 


Sub library 


//ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks) ; RL=cylin(rracks) 

SL=cyl in(tracks), PL=cyl in (tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYS sublibl . ALL[,sublib2. ALL, . . . .] 


Library 


//ASSGN SYS002,X'cuu" 

// DLBL IJSYSRS, 'DOS SYTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks), RL=cylin(tracks) 

SL=cyl in(tracks) , PL=cyl in(tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYS ALL 




Library 


//ASSGN SYS002, X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(track), RL=cylin(tracks) 

SL=cylin(tracks), PL=cylin(tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYS NEW 



LIBRARIAN (....Coord) 



Copy Unit 


Element 


Control Statement 


Procedure 


Procedure 


//ASSGN SYS002,X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(rracks),RL=cylin(rracks) 

SL=cylin(rracks), PL=cyl in (tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYP procedurenamel[,procedurename2, . . . .] 




Library 


//ASSGN SYSO^X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE", 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks),RL=cylin(tracks) 

SL=cylin(rracks),PL=cyl in (tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYP ALL 




//ASSGN SYS002, X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE*, 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(tracks), RL=cylin(tracks) 

SL=cylin(tracks), PL=cylin(tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPYP NEW 


Libraries 


All 


//ASSGN SYSM^X'cuu' 

// DLBL IJSYSRS, 'DOS SYSTEM RESIDENCE FILE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

ALLOC CL=cylin(rraclcs),RL=cylin(hacks) 

SL=cyl in(rracks), PL=cyl in(tracks) 
* ALLOC STATEMENT MUST ALWAYS BE PRESENT 

COPY ALL 



Copy Unit 


Element 


Control Statements 


Definition 
of a 
Private 

(See note 2) 


Core Image 


//ASSGN SYS003,X'cuu' 

// DLBL IJSYSPC, 'user identification of private 

1 ibrary ' , date , code 
// EXTENT SYS003, balance of extent information 
// EXEC CORGZ 

NEWVOL CL= cylin(tracks) 


Relocatable 


//ASSGN SYSRLB, X'cuu' 

// DLBL IJSYSRL, 'user identification of private 

library', date, code 
// EXTENT SYSRLB, balance of extent information 
// EXEC CORGZ 

NEWVOL RL= cylin(tracks) 


Source 
Statement 


//ASSGN SYSSLB,X'cuu' 

// DLBL USYSSL,'user identification of private 

library', date, code 
// EXTENT SYSSLB, balance of extent information 
// EXEC CORGZ 

NEWVOL SL= cylin(tracks) 


Definition 

Creation of 

Library 
(See note 2) 


Core Image 


//ASSGN SYS003,X'cuu' 

// DLBL IJSYSPC, 'user identification of private 

library', date, code 
// EXTENT SYS003, balance of extent information 
// EXEC CORGZ 

NEWVOL CL= cylin(tracks) 

COPYC operands 


Relocatable 


//ASSGN SYSRLB, X'cuu' 

// DLBL IJSYSRL, 'user identification of private 

1 ibrary ' , date , code 
// EXTENT SYSRLB, balance of extent information 
// EXEC CORGZ 

NEWVOL RL= cylin(tracks) 

COPYR operands 


Source 
Statement 


//ASSGN SYSSLB, X'cuu' 

// DLBL IJSYSSL, 'user identification of private 

library', date, code 
// EXTENT SYSSLB, balance of extent information 
// EXEC CORGZ 

NEWVOL SL= cylin(tracks) 

COPYS operands 


Merge System 
Residence to 
New System 
Residence 




// ASSGN (statements as required) 

// DLBL IJSYSRS,'NEW SYSTEM RESIDENCE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

MERGE RES,NRS 

COPY statements (COPYC, COPYR, COPYS, 

COPYP,COPYI) as required 



LIBRARIAN (....Cont'd) 



Copy Unit 


Element 


Control Statements 


Merge New 
System 
Residence 
to System 
Residence 




// ASSGN (statements as required) 

// DLBL IJSYSRS/NEW SYSTEM RESIDENCE', 

date, code 
// EXTENT SYS002, balance of extent information 
// EXEC CORGZ 

MERGE NRS,RES 

COPY statements (COPYI,COPYC,COPYR, 

COPYS,COPYP,COPY) as required 


Merge System 
Residence 
to Private 
Libraries 




// ASSGN (statements as required) 

// DLBL IJSYSRL, 'PRIVATE RELOCATABLE LIBRARY', 

date, code 
// EXTENT SYSRLB, balance of extent information 
// DLBL IJSYSSL/PRIVATE SOURCE STATEMENT 

LIBRARY', date, code 
// EXTENT SYSSLB, balance of extent information 
// DLBL IJSYSCL, 'PRIVATE CORE IMAGE LIBRARY', 

date, code 
// EXTENT SYSCLB, balance of extent information 
ASSGN SYSCLB,X'cuu' 
// EXEC CORGZ 

MERGE RES, PRV 

COPY statements (COPYI,COPYR,COPYS,COPYC) 

as required 


Merge New 
System 
Residence 
to Private 
Libraries 




// ASSGN (statements as required) 

// DLBL IJSYSRS, "NEW SYSTEM RESIDENCE',date, 

code 
// EXTENT SYS002, balance of extent information 
// DLBL IJSYSRL, 'PRIVATE RELOCATABLE LIBRARY', 

date, code 
// EXTENT SYSRLB, balance of extent information 
// DLBL IJSYSSL, 'PRIVATE SOURCE STATEMENT 

LIBRARY', date, code 
// EXTENT SYSSLB, balance of extent information 
// DLBL IJSYSCL, 'PRIVATE CORE IMAGE LIBRARY', 

date, code 
// EXTENT SYSCLB, balance of extent information 
ASSGN SYSCLB, X'cuu' 
// EXEC CORGZ 

MERGE NRS, PRV 

COPY statements (COPYR,COPYS,COPYC) as 

required 


Merge 
Private 
Libraries 
to System 
Residence 




// ASSGN (statements as required) 

// DLBL IJSYSPR, 'PRIVATE RELOCATABLE LIBRARY', 

date, code 
// EXTENT SYS001, balance of extent information 
// DLBL IJSYSPS, 'PRIVATE SOURCE STATEMENT 

LIBRARY', date, code 
// EXTENT SYS000, balance of extent information 
// DLBL IJSYSPC, 'PRIVATE CORE IMAGE LIBRARY', 

date, code 
// EXTENT SYS003, balance of extent information 



LIBRARIAN (....Cont'd) 



Copy Unit 


Element 


Control Statements 


Merge 

Libraries 
to System 
Residence 
(Cont'd) 




// EXEC CORGZ 
MERGE PRV,RES 

COPY statements (COPYR,COPYS,COPYC) as 
required 


Merge 

Libraries 
to New 
System 
Residence 




// ASSGN (statements as required) 

// DLBL IJSYSRS, 'NEW SYSTEM RESIDENCE', 

date, code 
// EXTENT SYS002, balance of extent information 
// DLBL IJSYSPR, 'PRIVATE RELOCATABLE LIBRARY', 

date, code 
// EXTENT SYS001, balance of extent information 
// DLBL IJSYSPS, 'PRIVATE SOURCE STATEMENT 

LIBRARY", date, code 
// EXTENT SYS000, balance of extent information 
// DLBL IJSVSPC, 'PRIVATE CORE IMAGE LIBRARY', 

date, code 
// EXTENT SYS003, balance of extent information 
// EXEC CORGZ 

MERGE PRV,NRS 

COPY statements (COPYR,COPYS,COPYC) as 

required 


Merge 

Libraries 
to Private 
Libraries 




//ASSGN (statements as required) 

// DLBL IJSYSRL, 'NEW PRIVATE RELOCATABLE 

LIBRARY", date, code 
// EXTENT SYSRLB, balance of extent information 
// DLBL IJSYSPR, 'EXISTING PRIVATE RELOCATABLE 

LIBRARY', date, code 
// EXTENT SYS001, balance of extent information 
// DLBL IJSYSSL, "NEW PRIVATE SOURCE STATEMENT 

LIBRARY, date, code 
// EXTENT SYSSLB, balance of extent information 
// DLBL IJSYSPS, 'EXISTING PRIVATE SOURCE 

STATEMENT LIBRARY', date, code 
// EXTENT SYS000, balance of extent Information 
// DLBL IJSYSCL, 'NEW PRIVATE CORE IMAGE 

LIBRARY', date, code 
// EXTENT SYSCLB, balance of extent information 
ASSGN SYSCLB, X'cuu' 
//DLBL IJSYSPC, 'EXISTING PRIVATE CORE IMAGE 

LIBRARY', date code 
// EXTENT SYS003, balance of extent information 
// EXEC CORGZ 

MERGE PRV,PRV 

COPY statements (COPYR,COPYS,COPYC) as 

required 

To define the private library in the same jobstep, precede 


MERGE with NEWVOL statement (except for COPYC 


statements). 



Notes : 1) //JOB, /* 
2) The private 
function 



and/& must be included where needed 

library can be updated with either a MAINT or a copy MERGE 



LIBRARIAN (....Cont'd) 



Direction of Transfer for Merge Operatio 



File Name 
Logical Unit 


IJSYSRS 
SYSRES 


IJSYSRS 


IJSYSRL 
SYSRLB 


IJSYSPR 
SYS001 


IJSYSSL 
SYSSLB 


IJSYSPS 
SYS000 


IJSYSCL 
SYSCLB 


IJSYSPC 
SYS003 


SYS002 


Merge RES to NRS 


from 


to 














Merge NRS to RES 


to 


from 














Merge RES to PRV 


from 




to 




to 




to 




Merge NRS to PRV 




from 


to 




to 




to 




Merge PRV to RES 


to 






from 




from 




from 


Merge PRV to NRS 




to 




from 




from 




from 


Merge PRV to PRV 






to 


from 


to 


from 


to 


from 



Function: De-editing and/or updating of edited macro's. 

(Refer to: Guide to DOS/VS Assembler (GC33-4024)) 



Control Statement 


Meaning 


// EXEC ESERV 




GENEND 


Causes generation of an assembler END 
statement, and a/* statement. GENEND, 
when present, must be the first statement 
after the// EXEC ESERV statement. 


GENCATALS 


Causes generation of the appropriate 
CATALS statement before each macro in 
the stream, and a /* statement after the 
last macro.GENCATALS,when present, 
must be the first statement after the 
// EXEC ESERV statement. 
Note: If neither GENEND nor GENCA- 
TATTis used, GENCATALS is assumed. 


DSPLYsublibl.macl,sublibl.mac2, 


Produces a printout of the de-edited macro 
on the device assigned to SYSLST. 


PUNCH sublibr.macl,sublibl.mac2, .... 


Produces a de-edited deck on the device 
assigned to SYSPCH. 


DSPCH sublibl.macl ,sublibl.mac2, 


Produces a deck and printout of the de- 
edited macro on the devices assigned to 
SYSPCH and SYSLST respectively. 


) COL start col,n 


Specifies the columns containing the se- 
quence numbers in the statement of a macro 
definition. 

startcol: A decimal number within 
the range 73-80,which 
identifies the start column 
of the sequence number, 
n: A decimal number within 
the range 1-8, specifying 
the number of columns used 
by the sequence number. 
COL, when present must be the first state- 
ment following DSPLY, PUNCH or DSPCH 
statement. If the COL statement is omitted 
startcol receives a default value of 73 and 
n a default value of 6. 


) VER seqno+rel,! 


Specifies the source statement of a macro 
definition which contents are to be verified. 

seqno+rel: Identifies the source state- 
ment which is to be compa- 
red with the statement fol- 
lowing the VER statement, 
segno: The sequence number 
of a source statement. 



ESERV (....Cont'd) 



Control Statement 


Meaning 


) VER seqno+rel, 1 
(Cont'd) 


rel: A decimal number of 
1-4 digits in length. If 
omitted, is assumed. 
1: A decimal number within 

the range 1-80. If omitted, 
72 is assumed. 
Only the first 1 characters 
are used in the comparison. 


) ADD seqno+rel 


Add statements to a source macro definition. 

seqno+rel: Identifies the source state- 
ment after which the new 
statements following the 
ADD statement are to be in- 
serted. 

(seqno: See VER statement) 
(rel : See VER statement) 


) DEL seqno+rel, seqno+rel 


Delete statements from a macro source defi- 

seqno+rel, seqno+rel: Identifies the first and 
the last source statement of 
the section to be deleted. 
If the second operand is 
omitted, only the source 
statement identified by the 
first operand is deleted, 
(seqno: See VER statement) 
(rel : See VER statement) 


) REP seqno+rel, seqno+rel 


Replace statements in a source macro defini- 
tion. 

seqno+rel, seqno+rel: Identifies the first and 
the last source statement of 
the section which is to be 
replaced by the statements 
following the REP statement. 
If the second operand is omitt 
omitted, only the source sta- 
tement identified by the first 
operand is replaced, 
(seqno: See VER statement) 
(rel : See VER statement) 


) RST seqno+rel 


Specifies a new sequence number serial starts. 

seqno+rel: Identifies the source state- 
ment after which the new 
serial starts. 

(seqno: See VER statement) 
(rel : See VER statement) 


) END 


Indicates the end of an update to a macro defi- 
nition. Required statement for all updating. 



Sample coding for de-editing without updating a macro definition 



//JOB NOUPDATE 
// EXEC ESERV 

PUNCH E.MAC1,E.MAC2 
/* 
/& 



Sample coding for de-editing and updating a macro definition 



// JOB UPDATE 
// EXEC ESERV 

GENEND 

DSPCH E.MAC I 
) COL 77,4 
) VER 72+1,5 
.PP9-} 
) ADD 72 + 1 

AIF (&PCH NE I400)D4 
) DEL 102,103 
) REP 245 

JOYCE CLC 0(4, REG6), BLANKS 
) END 
/* 

// PAUSE CHECK LIST,MOVE DECK TO READER 
// OPTION EDECK,NODECK 
// EXEC ASSEMBLY 

deck produced by ESERV 

// PAUSE MOVE SYSPCH DECK TO READER 
// EXEC MAINT 



deck produced by assembler 



/* 



The label information cylinder is on the first full cylinder after the last system 
library on SYSRES. A display of all labels on the cylinder, with the exception of 
Data Set Secured labels, can be obtained by executing LSERV. Illustrations in this 
section show the location of the label information cylinder on SYSRES, and the 
layout of label information end record format. 

System requirements 

LSERV may be executed in any partition, with a minimum of 8192 bytes of the 
real or virtual address areas. LSERV assumes that the SYSRES label cylinder is 
formatted as described in DOS/VS DASD Labels. 

Executing LSERV 

The control statements necessary to execute LSERV in a virtual partition are : 



// EXEC LSERV 

From the reader: 

// JOB jobname 
// EXEC LSERV 
/• 

A 

LSERV can also be executed in a real partition. The output of LSERV shows the 
contents of the label cylinder on the device assigned to SYSRES. The output is 
directed to the device assigned to SYSLST. 

When and How to use 

1 . Operator action given in DOS/VS Messages indicates when LSERV must be 
executed. 

Programmer action, also given in DOS/VS Messages, explains how to use the 
LSERV printout. 

For example, under the message : 
OP36 NO REC FND 

2. It is useful to execute LSERV prior to running a program that is known to have 
been run sometime in the past, but whose workfile assignments and partition 
allocations are unknown. 

3. LSERV can be used for error analysis. LSERV displays the TLBL and the DLBL 
and EXTENT information contained on the SYSRES label cylinder. Information 
about secured data files is not displayed. 



LSERV (...Continued) 
Summary of information provided 

The printout of LSERV will show you the following details about the previous run : 

o Whether the correct DLBL/EXTENT information is still on the label cylinder 

o The permanent files 

o The temporary files 

o Extent type 

o File type 

For more information, 

Refer to DOS/VS Serviceability Aids and Debugging Procedures (GC33-5380). 



SUPERVISOR MACROS 



r Macro Instruction 



Operation 


Operand 


Explanation 


SUPVR 


-fe] 


Specify if there is to be multiprogramming 




within a partition (multitasking) support. 




I J 


AITM=YES is assumed if AP=YES. If 






the operand (NO or YES) is incorrectly 






entered, YES is assumed. If AP=YES is 






specified and NPARTS is omitted or spe- 






cifies 1, NPARTS=3 is forced. 






AP=YES must be specified if support for 






Power/VS with RJE, SNA is required. 


«a,.{$ 


Specify YES if supervisor support of ASCII 
code is desired. 


CHAM= M 


Specify if channel attached devices, tape 




units or tp devices are to be added to a 




I J 


Model 115 or 125 CPU during system 




(Models 115 and 125 


generation or at 1PL time. CHAN=YES 




only) 


causes RMSR support to be generated. 
CHAN=NO is ignored if RMS=YES. 
RMS=YES overrides a specification of 
chan; it should be specified if full error 
recovery is required in addition to error 
recording. 


ERRLOG, kf] 


Specify RDE to include Reliability Data 




Extractor recording in addition to normal 




I J 


RMSR recording (YES). 






For the Model 115 or 125, CHAN=YES 






or RMS=YES must be specified if RDE is 






to be used . 


-fel 


YES must be specified if mixed parity tape 




processing is required for the emulators, 




L J - 


the tape preprocessor and the tape post- 






processor programs . 


— $} 


Specify if the supervisor is to provide MCAR/ 
CCH support for a Model 1 15 or 125 CPU. 




(models 115 and 125 only) 


RMS=YES overrides MCH-NO. 
MCH=YES in conjunction with CHAN=YES 
is equivalent to specify in RMS=YES. In 
addition to the software recording services 
generated by specifying CHAN=YES. 


f NO 1 


Indicates whether the supervisor is to sup- 




MICR= <TTTC > 


port magnetic ink character readers or 




1.14 19dJ 


optical reader/sorter. If 1419's or 1255/ 
1270/1275's are attached to a multiplexer 
channel, the PIOCS parameter BMPX=YES 
is supported; however, burst mode and MICR 
Hevices cannot run concurrently on the same 
byte multiplexer channel. (3886 OCR's do 
not require MICR support). 



SUPERVISOR MACROS (. . .Cont'd) 



Supervisor Macro Insrru 



Opera 



Operand 



Explanatio 



SUPVR 
(Cont'd) 



■8 



■M 



powb-H 



(models 115 and 125 



Specifies the number of partitions to be sup- 
ported. The maximum value for n is 5. The 
default value is 1 if the AP parameter is 
omitted, or if AP=NO. The default value is 
3 if AP=YES. If POWER=YES is specified, 
NPARTS=2, 3, 4, or 5 must be specified 
unless AP=YES is specified. 



Specify this parameter if you plan to use the 
Supervisor Select option. You can assign a 
unique name to the supervisor being 
generated by specifying any alphameric 
character (A-Z, 1-9) in this field. 



Specify that paging activity is to be 
controlled by the PAGE IN, RELPAG, 
and FCEPGOUT macros. The value n 
indicates the maximum of page-in requests 
that can be queued at any one time for 



Specify if page fault handling overlap is 
desired for private multitasking. YES is 
required if SETPFA macro instructions are 
used. When PHO=YES, PFIX=YES is 

assumed. 



Specify YES for support of POWER/VS. If 
NPARTS=1 or omitted, POWER=YES causes 
NPARTS=3 to be generated. 
For details of generation parameters, refer 
to Power Section. 



Specify YES for RMS support (MCAR/CCH 
and RMSR) for a Model 115 or 125 CPU. 
RMS=YES overrides specification of CHAN 
and/or MCH. RMS=YES is required if the 
string switch feature is installed. 
RMS=YES should be specified if a multiple 
partition system is used. 



SUPERVISOR MACROS (. . .Cont'd) 






r Mocro Instruction (...Cont'd) 



Operand 



Explanatio 



SUPVR 
Cont'd 



[NO ] 

VTAM 

hi AM QVTAM] 
QTAM CVTAM] 
QTAMn kVTAMJ 



Specify if teleprocessing support is desired. 
QTAM includes BTAM support. If AP=YES, 
n specifies the maximum number of active 
QTAM message processing programs in the 
system. From 2 to 12 may be specified. The 
default value for n is 2. If AP=NO, n is 
always 2. If QTAM is specified, then 
NPARTS=2, 3, 4, or 5 must be specified 
unless AP=YES is specified. If BTAM runs 
virtual, PFIX=YES is required. If VTAM is 
specified, AP=YES must be specified. 
Support is included for TP Balancing, unless 
TP=NO is specified or TP=STAM and 
NPARTS=1. 

TP= if Power =YES with RJE, SNA, 
TP=VTAM must be specified. 



Describe the Hardwi 



Operation 


Operand 


Explanation 


CONFG 


-M 


Floating Point Feature 


(-115 "I 
125 
135 
MODEL= -i 138 
145 
148 
155-11 

[158 . 




Specify the CPU model number. Model=135, 138, 
145, 148, 155-11 or 158 forces MCAR/CCH and 
RMSR to be generated. When Model=125 is 
specified, support for DOC and 3330 is always 
generated. When Model=115 is specified, 
support for DOC and 3340 is always generated. 



Specify Standard settings for Job Contrc 



Operation 


Operand 


Explanation 


STDJC 


AL,GN= P] 


Specify if the assembler is to align data on 
halfword or fullword boundaries. 


ACANCEL={N°) 


Specify if Job Control is to cancel jobs 
(ACANCEL=YES) or await operator 
intervention (ACANCEL=NO) after an un- 
successful attempt to assign a device. 


CHAKET={g§-} 


Specify the 48- or 60 character set for 
PL/1 translator input on SYSIPT. 


nATC /mdy) 
DATE= (dmy) 


Format of the date. 



SUPERVISOR MACROS (. . .Cont'd) 
Specify Standard settings for Job Control 



Operation 


Operand 


Explanation 


STDJC 
(cont'd) 


««-flS} 


Output of object modules of language 
translators on SYSPCH. 


fYEST 

DUMP=<FTO \ 

(PARTJ 


Dump of registers and virtual storage on 
SYSLST. PART dump of supervisor control 
blocks and virtual storage of the partition 
on SYSLST. 


™«- {$ 


Specify if the assembler is to create and 
punch edited macros on SYSPCH. 


<«- m 


COBOL, PL/1, FORTRAN and basic 
FORTRAN summarize all errors in source 
programs on SYSLST. 


— M 


Number of lines per page on SYSLST (nn 
must be between 30 and 99). 


H$ 


Source module listings and diagnostics 
from language translators on SYSLST. 


USTX={-} 


Hexadecimal object module listings from 
PL/1 and COBOL on SYSLST. 




«>°= HI 


Listing of all control statements on SYSLST 


■">"£ 


Specifies whether RLD information is to 
be printed . 


SPARM= fcgj 


Support of assembler system variable 
symbol &SYSPARM 


SVM--{^j 


PL/1 outputs symbol tables on SYSPCH. 
The American National Standard COBOL 
compiler produces a data division glossary. 


»- {^ 


Assembler and American National Standard 
COBOL compiler output symbolic cross- 
reference lists on SYSLST. 



Specify Optional Support in the Supervisor 



Operation 


Operand 


Explanation 


FOPT 


«-{?§} 


Specify if the abnormal termination exit 
function is to be supported. The abnormal 
termination exit allows the user to exit to a 
user's routine before an abnormal end of job 
causes a program to be cancelled. Specify 
YES for American National Standard 
COBOL I/O error recovery. AB=YES is 
forced by VSAM=YES or TP=VTAM. 



SUPERVISOR MACROS (. . .Cont'd) 



Specify Optional Support in the Superviso 


r (...Cont'd) 




Operation 


Operand 


Explanation 


FOPT 
(Cont'd) 


~H 


Specify if I/O requests are to be appraised 
for console buffering and indicate the 
number of buffers (3-25) to be generated. 
CFB=NO is forced if Model = 115, 125, 138 
or 148 is specified together with 
doc = 125Dor3277. 


DASDFP=|NO n2[ - 2 3 2l]) | 


Specification of n , n provides file protection 
for disk devices. For reasons of compatibility 
with previous releases, specifications for all 
disk devices are accepted, but treated as 
documentation (that is, the parameter is 
ignored) 


DOC= 


No! 
T25D( 
3277) 


Specify if support for the Display Operator 
Console (DOC) is to be generated. The 
default is NO if MODEL=135, 145, 155-11, 
or 158. For MODE L=ll 5 or 125, DOC=125D 
is forced. If Model=138,148 the default is 3277. 


ECPREAU-^] 


Specification of this parameter allows use of 
the VIRTAD macro, and of the REALAD macro 
and of the EXCP macro with the REAL 
parameter. 


ERRQ= h\ 


Specify the number of entries for the error 
queue. Without multiprogramming n may 
be from 3 to 25. With multiprogramming 
support n may be from 5 to 25. The lower 
value is the default value in each case. 


""-{£} 


Specify if error volume analysis is supported, 
r Is the read error parameter; w is the write 
error parameter. 


F«m. £g) 


Specify if fast CCW translation is to be 
supported. Fast translation is attempted 
for all channel programs except : 

1 . Those containing non-contiguous CCW 

2. Those associated with translation requests 
from BTAM. 


— {^} 


Specify storage management support, using 
GETVIS and FREEVIS macro instructions. 
YES is assumed if VSAM=YES or TP=^TAM. 
GETVIS=YES forces RELLDR=YES. 
Getvis=yes if 3344/3350 AP 1 program 
will be invoked. 


«»»-{?§} 


Specify the independent directory read-in 
area (IDRA). If IDRA=YES, NPARTS must 
be>l. 



SUPERVISOR MACROS (. . .Cont'd) 
Specify Optional Support in the Superv 



Operand 



Explanation 



FOPT 
(cont'd) 



-¥) 



STXIT option is available for interval timer 
interruption. IT=YES generates timer support 
for all tasks in all partitions. YES is forced 
by fP~=VTAM. 

Specify yes if 3344/3350 AP-1 program 
will be invoked. 



fNO 
JA=< YET 

I(nl,n2,n3,n4,n5) 



Specify if job control job accounting 
interface is to be supported. 



[no 



» § 



-M 



¥s 



"4: 



4^ 



PRTY= (partition name 
sequence) 



H 



Specify for support of user-written job control 
job accounting interface routines containing 
LIOCS, and {.IOCS with label processing 



STXIT option is available for external inter- 
ruptions (except timer) to problem programs. 
YES is required if emulator program operator 
services are to be requested through the 
INTERRUPT key. OC=YES is forced if 
RETAIN=YES, OLTEP=YES orTP=A/TAM. 



Specify if the on-line testing function is 
desired. If OLTEP=YES then OC=YES and 
RELLDR=YES are forced. OLTEP=YES is 
forced if RETAIN=YES. 



STXIT option is available for program check 
interruption. Included in supplied supervisor 
because QTAM, FORTRAN, COBOL-D, PI/1 
and RPG require PC=YES . 



Specify if private core image libraries are to 
be supported. PCIL=NO forces PSLD=NO. 



Specify the number of bytes to be allocated 
to the problem determination programs. Any 
amount between 1400 and 10240 may be spe- 
cified for n. Specification of YES provides 
the minimum number of 1400 bytes. 



Specify if the supervisor is to support the 
fixing and freeing of pages in real partitions. 
PFIX=YES is forced by PHO=YES, 
POWER=YES, or TP=VTAM. 



Specify the desired dispatching priority for 
each partition (from low to high). 



Specify the number of entries in the Private 
Second Level Directories. A directory is 
created for each partition. The minimum value 
for n is 5. PCIL=NO forces PSLD=NO. 



SUPERVISOR MACROS (...Cont'd) 

Specify Optional Support in the Supervisor (...Cont'd) 



Operation 


Operand 


Explanation 


FOPT 
(Cont'd) 


R EUOR={-} 


Specify relocating load support in the super- 
visor. RELLDR=YES is forced by VSAM=YES, 
GETVIS=YES, OLTEP=Y£S, RPS=YES, 
RETAIN=YES, and TP=VTAM. 


RETAIN- jjfgj 


Generates support for relocating 
relocatable phases. The default value 
is YES. YES is forced by VSAM=YES, 
OLTEP=YES, GETVIS=YES, RPS=YES, 
RETAIN=YES, and TP=VTAM. 


f N °l 

sksep=|yRI 


Specify if seeks are to be separated from the 
remainder of channel programs. Seek separa- 
tion allows other devices on the channel to be 
accessed (including other seeks) during the 
seek. 

YES indicates support for all DASD type de- 
vices specified by the DVCGEN macro, n is 
the number of DASD devices to be supported 
and can not be less than the number of 
DASD devices specified at system generation. 
The maximum number is 254. 


SLD- 


!«} 


Specify the number of entries in the Second 
Level Directory. The minimum value for n is 5. 



SUPERVISOR MACROS (. . . Cont'd) 

Specify OpHonol Support in the Supervisor (. . .Cont'd) 



Operation 


Operand 


Explanation 


FOPT 
(cont'd) 


SVNCH= {^-] 


Specify SYNCH=YES if the use of an IBM 
provided program requires the synchronous 
exit facility (SVC) screening. 




fNO 1 

SYSFIL= <YE3 } 

[(YES,nl,n2)J 


Specify if system input and system output 
files (SYSRDR, SYSIPT, SYSLST, SYSPCH) 
may be assigned to a disk device or an 3540 
Diskette or, if extended support for the 
procedure library is desired. In a disk only 
configuration SYSFIL=YES is required for 
system maintenance. 

nl = residual capacity for beginning of 
operator notification where SYSLST 
assigned to a disk device. 
100<n 1^65535. If n] is omitted, 
1000 is assumed. 

n2= residual capacity for beginning of 

operator noti fication where SYSPCH 
assigned to a disk device. 
100<n2<65535. If n2 is omitted, 
1000 is assumed. 

Note : If neither nl or n2 is specified, the 
operand need not be placed between 
parentheses . 


TEB= hi 


Specify if tape error statistics are to be 
accumulated and logged for the 2495 Tape 
Cartridge Reader, where n is the number of 
tape cartridge readers attached to the 
system. Allow extra TEB's for future expansion 
of the system. 


TEBV= {gj 


Specify the type of error recording 
(combined or individual) to be performed 
for unlabeled or non-standard tapes. 



SUPERVISOR MACROS (. ■ . Cont'd) 



Specify Optional Support in the Supervisor (. . .Cont'd) 



FOPT 
(cont'd) 



-{«} 



Specify time of day clock support. 
TP=VTAM forces TOD=YES. 



(no_ 1 

J partition IDf 



-{*} 



■{*} 



■{«} 



Specify if the task timer support is to be 
generated in the supervisor. The partition 
ID (BG, Fl, F2, etc.) designates the 
partition that owns the task timer. 

Support must be generated for the portion 
that owns the task timer by corresponding 
specification in the N PARTS parameter of 
SUPVR macro. Example: with NPARTS=2 
specified, valid partition ID specifications 
are BG or Fl . If NPARTS=3, Part. ID, BG, 
Fl or F2 is valid. 



Specify of the track hold function is 
to be supported. The maximum number 
of tracks that can be held at one time 
is 225. The default is 10 if n is an 
invalid operand (non-numeric or 
outside the range 1-255). 
If TRKHLD=n is specified, NPARTS 
must be 1. 



Specify if you want a supervisor id to be 
printed as part of the IPL COMPLETE 
message, id may be up to 16 bytes long. 



Specify if supervisor support of the Virtual 
Storage Access Method (VSAM) is desired. 
If VSAM=YES, YES is assumed for GETVIS, 
AB and RELLDR. 



Specify if multiple wait function is to be 
supported. WAITM=YES is assumed if 
AP=YES or TP=VTAM. 



SUPERVISOR MACROS (...CONT'd) 



Specify Optional Support in the Supervisor (. . .Cont'd) 



Operation 


Operand 


Explanation 


FOPT 
(Cont'd) 


[no] 

XECB= < YF37 


Specifies whether Cross Partition Event 
Control is to be supported. If YES is 
specified, four XECB's are generated 
per partition (as specified in NPARTS) 
n must be specified as a numeric value 
and indicates the number of XECB's for 
which an entry is to be generated in a 
supervisor internal table. 


ZONE= J "EA3T . , I 
[ WEST ' hh ' ,m J 


Specify the difference between Greenwich 
Mean Time and local time in hours (hh) and 
minutes (mm). Use EAST for areas east of 
Greenwich and WEST for areas west of 
Greenwich. If TOD=NO is specified, 
ZONE=NO is assumed. If the first operand is 
incorrectly specified, EAST is assumed. 


«={-] 


Provides support for the Rotational Position 
Sensing (RPS) capabilities of DASD devices 
supporting the feature. RPS=YES forces 
BLKMPS=YES in the PIOCS macro instruction 
and GETV1S=YES and RELLDR=YES in the 
FOPT macro. 



Define options and Configuration requirements to be included in Physical IOCS 



Operation 


Operand 


Explanation 


PIOCS 


BLKMPX= 


no! 

YE37 


Specify if block multiplexer mode is to be 
supported for integrated black multiplex 
channels. Must be NO for disk emulation. 


bmpx={no] 


Burst mode device support on multiplexer 
channel. If overrunnable devices are 
attached to the multiplexer channel, BMPX= 
YES is supported. However, burst mode and 
MICR devices cannot run concurrently on the 
same byte multiplexer channel. 


fNO "I 

CHANSW= < RWTAU } 

[ TSWTCHj 


Specify if channel switching. For a 2404 or 
2804, enter CHANSW=RWTAU. Enter 
CHANSW=TSWTCH for a 2816 (with a 2403 
or 2803) or a 3803. 



SUPERVI SOR MACRO S ( . . . . Cont 'd ) 



Operation 


Operand 


Explanation 


PIOCS 
(Cont'd) 


DISK- 


'231 1 

33"T? 

3330 

3340 

3350 

(3330,3340) 

(3330,3350) 

(3340,3350) 

.(3330, 3340, 3350)_ 


Support for the IBM 2311, 2314/2319. 
Specification of DISK=33xx gives support 
for all attachable DASD devices of the 
type specified. If support for more than 
one type of DASD device is required, 
each type must be specified. For example, 
to provide support for 3330s and 3340s, 
specify DISK=(3330,3340). This provides 
no support for 3350s. 


MRSLCH=|^| 


Specify if MICR device is on the selector 
channel (can only be specified for the 
1419 single address device). 


TAPE 




Specify PIOCS tape support. Support is gene- 
rated for both 7- and 9 track tape unless NO 
is specified. 



Specify Size of Real and Virtual Address Areas 



Operand 



Explanatio 



(nK, mK) 



Specifies the maximum size of real storage, 
n may be up to 81900 and must be a multiple 
of 2. If not specified, or specified 
incorrectly, 96 is assumed. 



Specify the size of the virtual address area, 
n must be»64 and a multiple of 2. The maxi- 
mum value that can be substituted for n is 
16K (16384) minus the value substituted for n 
in the RSIZE parameter. 



Specify the number of copy blocks to be used 
by the Channel Program Translation routine. 
The following table shows the minimi m value 
that can be specified and default value that 
is used if the operand is omitted. 



FASTTR- 


NPARTS= 


BUFSIZE= 
Default Minimum 


NO 


1 


10 


10 


NO 


2-5 


30 


10 


YES 


1 


30 


30 


YES 


n(-2-5) 


30+(nx20) 


30 



nK specifies the size of the Shared Virtual 
Area (SVA); mK specifies the size of the system 
GETVIS area in the SVA. n must be at least 64 
and a multiple of 2. m must be smaller than n 
and also a multiple of 2. 



SUPERVISOR MACROS 



Specify partitioning of Virtual Address Area 



Operation 


Operand 


Explanation 


ALLOC 


Fn=mK [,Fn=mK] 


Operands may be specified in random order, 
m must be a multiple of 2 and should not be 
less than 64, unless is specified. 



Specify partitioning of Real Address Area (less Supervisor and Main Page Pool) 



Operation 


Operand 


Explanation 


ALLOCR 


BGR=mK [FnR=mK] 


Operands may be specified in random order, 
m must be a multiple of 2. Minimum amount 
of real storage to be reserved for the main 
page pool is : 18K bytes (+2K if AP=YES) 
if PFIX=YES, or 18K bytes (+2K if AP=YES) 
minus the size of the smallest real partition 
if PFIX=NO. 



Define the necessary Input/Output Tables for the System 



Operation 


Operand 


Explanation 


IOTAB 


BGPGR=[^J 


Specify the number of logical unit blocks (LUB 
for programmer units i.e. , the number of sym- 
bolic programmer logical units (SYS0O0- 
SYSnnn). 


FnPGR=|^l 


Specify the number of symbolic programmer 
logical units (of the class SYSnnn) for the 
foreground partition Fl . The minimum 
value for m is 5, and the maximum is 241 . 
For the remaining foreground partitions 
the minimum value for m is 5 while the 
maximum depends on the number of 
partitions specified. Refer to SYS Gen. 
Manual . 


~fl 


Number of JIB 's for the system. Minimum 
value generated is 5. Max. is 255 


NRES-IJfl 


Specifies the number of named resources in the 
system, n can have any value between 2 and 
255. " 



SUPERVISOR MACROS (....Cont'd) 



Expianatio 



IOTAB 
(Cont'd) 



»® 



D2311=n 
D2314= n 
D2321= n 
D2400= n 
D3330= n 
D3340=n 
D3350= n 
D3410=n 
D3420= n 
D3540= n 
D3886=n 



SSLNS=j^| 

(Model 115/125 
only) 



BSCLNS=|M 
(Model 115/125) 



Number of entries in the channel queue 
Minimum value is 6 if NPARTS= 1,2 or 3; 8 if 
NPARTS=4; 10 if NPARTS=5 etc. 
For default values see Sys.Gen.Man. 



Specify the number of I/O device attached to 
the system. The minimum value is 5. 



Specify, for each I/O device listed at the 
left, the number of drives that are attached 
to our system. If the device is not specified, 
the system assumes that no devices of that 
type are attached. However, defaults other 
than zero are taken depending on the CPU 
Model specified and (for tape devices) 
whether PIOCS tape support is generated 
or not (see table below): 



Default 



D2314=2 
D2400=4 
D3330=2 
D3340=2 
D3350=2 
D3410=2 



PIOCS 



m 



Config. Macrc 
Model 



135,135-3, 
138,145, 
145-3,148, 
155-11,158 



* Eithei 



applie 



Specify the number of Start/Stop lines for the 
Model 115 or 125 CPU. n may be any value 
between and 8 for Model 1 15 and and 16 
for Model 125. 



Specify the number of BSC lines for the Model 
1 15 or 125 CPU. n may be any value between 
and 4 for Model 1 15 and and 6 for Model 
125. 



Specify the Physical I/O units attached to the System 



Operation 


Operand 


Explanation 


DVCGEN 
(Note 1) 


CHUN= X'cuu' 


Hexadecimal number of channel and unit. 



SUPERVISOR MACROS (. . . .Cont'd) 



DVCGEN 
(Note 1) 
(Cont'd) 



Specify the Type of device. 



YES indicates that the device is attached to 
more than one selector channel (the device 
is swifchable) 



IX'ssssss* J 



1 ) 2400T9; MODE is used to specify the tape 
mode. X'CO' is the default value. 

2) 3410T9 or 3420T9; MODE specifies the 
tape mode. X'CO' is the default value. 

3) 3420T9; MODE specifies the tape mode. 
X'DO* is the default value for single 
and dual density. 

4) 2400T7or 3420T7; MODE is used to spe- 
cify the tape mode. X'90' is the default. 

5) 2702; MODE designates the SADxx com- 
mand. X'OO' is the default value. 
X'OO* SADO, X'Ol' SAD1, X'02' SAD2, 
X'03' SAD3. 

6) 2260 (local) and 3270 (local) 
MODE is used to specify the 1053, 
3284 or 3286 printer when CHUN= 
X'cuu' refers to a 1053 attached to a 
2848 or to either 3284 or a 3286 
attached to a 3272. This operand must 
be entered as X'01*. 

7) 1419, 1255, 1259, 1270, 1275 MODE 
designates the external interrupt bit 
associated with magnetic ink charac- 
ter reader. 

X'01' External line 7 
X'02' External line 6 
X'04' External line 5 
X'08' External line 4 
X'10' External line 3 
X'20' External line 2 

8) 1018 MODE specifies whether the 
Error Correction feature is present or 
not. X'OO' is the default value. The 
operand must be entered as X'01' if 
the feature is present. 

9) 2703 For a Model 115 and 125 with 
ICA, MODE=X'ss', MODE=X'ssss', 

or MODE=X'ssssss' specifies the line 
mode setting for a start/stop or BSC 
line. 

10) 3705 MODE specifies the type of channel 
adapter. No default is assumed X'01' 
Type 1 or 4 channel adapter. X*02* 
Type 2 or 3 channel adapter. 



SUPERVISOR MACROS (....Cont'd) 

Assign LUB's to PUB's as Stondord System Assignments 



Operation 


Operand 


Explanation 


ASSGN 
(Note 2) 


cvc v X BG ¥ H, 1 
SYSnnn, X cuo 1 r — |fT42| 


Symbolic unit is assigned a hexadecimal 
channel and unit number within a parti- 
tion, and an input hopper for an IBM 
2560 or 5425 



Define the Page Data Set 



Operation 


Operand 


Explanation 


DPD 


UNIT= X'cuu' 


Specify channel and unit number of the 
disk device that is to contain the page 
data set. 


CYL = nnn 


Specify the number of the cylinder where 
the page data set is to begin . 


VOLID= xxxxxx 


Specify the volume serial number of the 
disk pack that holds the page data set. 


SEND 


(n) 


End of supervisor macro instructions. 
n= beginning address of the problem 
program area. 



Note 1: Rules for using DVCGEN 

1 A separate DVCGEN macro instruction is required for each device. 

2 The total number of DVCGEN macros must not exceed the total number 
of devices specified in the I0DEV parameter of the IOTAB macro. 

3 DVCGEN macros must be specified in ascending channel address 
sequence. 

4 Swit enable units (attached to more than one selector channel) must be 
defined once. They are defined on the lowest channel on which they 
are addressable. 

5 The sequence of the DVCGEN cards determines the priority of the 
devices on their channel. Swit enable units must be the last device 
for each channel, end must be on consecutive channels. 

6 The specifications of these macros may be altered by !PL and DEL 
statements. 



SUPERVISOR MACROS (....Cont'd) 



• Note 2: Rules for using ASSGN 

1 The ASSGN macro allows SYSRDR, SYSLST, SYSPCH and SYS1PT to be 
assigned to a tape or DASD. However, IPL unassigns any such assignments. 

2 SYSLOG must also be assigned in BG, if assigned in foreground partition. 

3 SYSLNK can only be assigned to a foreground partition if PCIL has been 
specified and NPARTS> 1 . 



DEVICE TYPE CODES 



Card 
Code 


Actual IBM Device 


Device- 
Type XW 


Device Type 


2400T9 


9-track Magnetic Tape 
Tape units 


50 




2400T7 


7-track Magnetic 
Tape units 


50 




3410T9 


9-track 3410 Magnetic 


53 






Tape units 




Magnetic Tape devices 


3410T7 


7-track 3410 Magnetic 

Tape units 


53 




3420T9 


9-track 3420 Magnetic 
Tape units 


52 




3420T7 


7-track 3420 Magnetic 
Tape units 


52 




1442N1 


1442N1 Card Read Punch 


30 




2520B1 


2520B1 Card Read Punch 


31 




2560 


2560 Multifunction Card 


33 






machine 




Card Read Punches 


2596 


2596 Card Read Punch 


30 




3525RP 


3525 Card Punch (with 
optional read Feature) 


32 




5425 


5425 Multifunction card 
Unit 


34 




2501 


2501 Card Reader 


10 




2540R 
3504 


2540 Card Reader 
3504 Card Reader 


11 
12 


Card Readers 


3505 


3505 Card Reader 


12 




2540P 


2540 Card Punch 


21 




2520B2 


2520B2 Card Punch 


20 




1442N2 


1442N2 Card Punch 


22 


Card Punches 


2520B3 


2520B3 Card Punch 


20 




3525P 


3525 Card Punch 


23 




PRT 1 


3211 or 3203-4 Printer 


43 




1403 


1403 Printer 


40 




1403U 


1403 Printer with UCS feat 


urT] 42 
— 41 




1443 


1443 Printer 




2260(local) 


1053 Printer with 2848 
Control Unit. MODE 
operand must be entered 
asX'Ol' 


CO 




3203 


3203 Printer 


4A 


Printers 


3211 


321 1 or 3203-4 Printer 


43 




3277 


3284 or 3286 Printer with 


B0 




(local 3270) 


3272 Control Unit. MODE 
operand must be entered 
as X'Ol' 






3277B 


3284 or 3286 Printer with 


B0 




(local 3270) 


3272 Control Unit, attach- 
ed in burst mode to a mul- 
tiplexer channel. MODE 
operand must be entered 
asX'Ol' 






5203 


5203 Printer 


AC 




5203U 


5203 Printer with UCS 


4D 





DEVICE TYPE CODES (...Cont'd) 



Card 


Actual IBM device 


Device 


Device Type 


Code 




Type XW 




1050A 


3210,3215 Console 
Printer Keyboards 


00 


Printer Keyboards 


125D 


Model 115/125 Integrated 
Display Operator Console 


B2 




125DP 


Model 115/125 Integrated 
Display Operator Console 
with 5213 Console Printer 
attached 

Note : Codes are valid for 
native Alpha Numeric 
Replacement mode and for 
1052 emulation. The 1052 
mode is not supported with 


B2 


Display Operator Consoles 




Indirect Data Addressing (IDA)I 




3277 


3277 Operator Console | B0 




UNSP 


Unsupported device 


FF 


Unsupported no burst mode 
on multiplexor channel 


UNSPB 


Unsupported device 


FF 


Unsupported with burst 
mode on multiplexor channe 


2311 


231 1 Disk Storage Device 


60 




2314 


2314 Direct Access Storage 
Facility 


62 




2314 


2319 Disk Storage Facility 


62 




2321 


2321 Data Cell Drive 


61 




3330 


3330-1,3330-2 or 3333-1 


63 






Disk Storage 


— . 




3330 


3350 Direct Access Storage in 
3330 Compatibility mode 


63 




3330B 


3330 Disk Storage Model 11 


65 




3340 


3340 Disk Storage (General) 


68 




3340R 


3340 Disk Storage with 
RPS feature (with or 
without 3340 Data 
Module, Model 35) 


— ' 69 




3340R 


3340 Disk Storage with 
RPS feature (with or 
without 3340 Data 
Module, Model 70) 


6A 


DASD 


3340 


3340 Disk Storage without 
RPS feature (with or 
without 3340 Data 
Module, Model 35) 


69 




3340 


3340 Disk Storage without 
ROS feature (with or 
without 3340 Data 
Module, Model 70) 


6A 




3340R 


3344 Direct Access Storage 


6A 




3350 


3350 Direct Access Storage 


67 




1419 


1255 Magnetic Character 
Reader 


72 




1419 


1259 Magnetic Character 


72 






Reader 




MICR-Magnetic Ink 


1419 


1419 Magnetic Character 


72 


Character Recognition 




Reader 




devices 


1419P 


1419 Dual Address Adap- 
ter Primary Control Unit 


73 




1419S 


1419 Dual Address Adap- 
ter Secondary Contr.Unit 


74 




2955 


2955 Data Adapter Unit 


D7 


Data Link for RETAIN 



DEVICE TYPE CODES (....Confd) 



Card 
Code 


Actual IBM device 


Device- 
Type X'nn" 


Device Type 


2701 


2701/2715 Data Adapter 


DO 


Teleprocessing lines 


2703 


Integrated Communications 
Adapter (Model 135) 


D2 




A 






A=SAD0comm-d when 


o 


2702 Transmission Control 


Dl 


^™ COmm i cabling 
C=SAD2 comm'd ^ |. ne 


2702 _ 


unit 




D 






D=SAD3 comm'd 


2703 


2703 Transmission Control 


D2 




2703 


Integrated Communication 
Adapter (Mod. 115/125) 


D2 




2703 


3704/3705 Communication 
Controller in Emulation 
Mode 


D2 




3704 


3704 Communication 
Controller in Network 
Control Mode 


DC 




3705 


3705 Communication 
Controller in Network 
Control Mode 


DC 




3791 L 


3791 Local Communication 
Controller 


DE 




1419 


1270 Optical Reader/ 
Sorter 


72 




1419 


1275 Optical Reader/ 
Sorter 


72 




1419P 


1275 Dual Address Adapter 
Primary Control Unit 


73 




1419S 


1275 Dual Address Adapter 
Secondary Control Unit 


74 


Optical Readers 


1287 


1287 Optical Reader 


77 




1288 


1288 Optical Page Reader 


77 




3881 


3881 Optical Mark Reader 


11 




3886 


3886 Optical Character 
Reader 


7C 




3540 


3540 Diskette 


80 


Diskette 




Input/Output Unit 




2260 


2260 Display Station 


CO 




3277 


3277 Display Station; 






(local 3270) 


MODE operand need not 
be entered 






3277B 


3277 Display Station; 


B0 


Display Stations 


(local 3270) 


attached in burst mode to 
a multiplexor channel. 
MODE operand need not 
be entered 






7770 


7770 Audio Response Unit 


D3 


Audio Response Unit 


1017 


1017 Paper Tape Reader 
with 2826 Control Unit 


78 


Paper Tape Readers 


2671 


2671 Paper Tape Reader 


70 




1018 


1018 Paper Tape Punch 
with 2826 Control Unit 


79 


Paper Tape Punch 


2495TC 


2495 Tape Cartridge 
Reader 


51 


Tape Cartridge Reader 



FORMAT OF THE ESD CARD 

Card 
Columns 

1 Multiple punch (12-2-9). 

Identifies this as a loader card. 

2- 4 ESD — External Symbol Dictionary card. 

] 1-12 Number of bytes of information contained in this card. 

15-16 External symbol identification number (ESID) of the first SD,PC, 

CM or ER on this card. Relates the SD,PC,CM or ER to a particular 
control section. 

17-72 Variable information. 

8 positions - Name 

1 position - Type code hex '00 , , , 0r,'02 , , , 04 , / , 05 , / or 'OA' to 

indicate SD,LD,ER,PC,CM, or WX respectively. 

3 positions - Assembled origin 

1 position - Blank 

3 positions - Lenghth,if an SD type, CM type, or a PC type. 

If an LD type, this field contains the external symbol identification 

number (ESID) of the SD containing the label. 
73-80 May be used by the programmer for identification. 

FORMAT OF THE TXT CARD 



Card 
Columns 

1 Multiple punch (12-2-9). 

Identifies this as a loader card. 

2- 4 TXT -Text card. 

6- 8 Assembled origin (Address of first byte to be loaded from this card). 

11-12 Number of bytes of text to be loaded. 

15-16 External symbol identification number (ESID) of the control section 

(SD or PC) containing the text. 

17-72 Up to 56 bytes of text — data or instructions to be loaded. 

73-80 May be used for program identification. 

FORMAT OF THE RLD CARD 



1 Multiple punch (12-2-9). 

Identifies this as a loader card. 

2- 4 RLD — Relocation List Dictionary Card. 

1 1-12 Number of bytes of information contained in this card. 

17-72 Variable information (multiple items). 

a. Two positions - (relocation identifier) pointer to the ESID number 
of the ESD item on which the relocation factor of the contents 

of the address constant is dependent . 

b. Two positions 



FORMAT OF THE RLD CARD (. . . .Cont'd) 

b. Two positions - (position identifier) pointer to the ESID number 
of the ESD item on which the position of the address constant 

is dependent. 

c. One position - flag indicating type of constant, as follows: 

Bits 

0-2 Ignored 

3 - a non branch type load constant 

I - a branch type load constant 

4-5 00 - load constant Iength= 1 byte 
01 - load constant length=2 bytes 
10 - load constant length= 3 bytes 

I I - load constant length= 4 bytes 

6 - relocation factor is to be added 

1 - relocation factor is to be subtracted 

7 - Next load constant has different R and P identifiers; 

therefore, both R and P must be present. 
1 - Next load constant has the same R and P identifiers; 
therefore they are both omitted. 

Five significant bits of this byte are expanded in the RSERV printout. 

d. Three positions - assembled origin of load constant. 

73-80 May be used for program identification. 

FORMAT OF THE END CARD 



1 Multiple punch (12-2-9). 
Identifies this as a loader card. 

2 -4 END 

6 -8 Assembled origin of the label supplied to the Assembler in the 

END card (optional). 

15-16 ESID number of the control section to which this END card refers 

(only if 6-8 present). 

17-22 Symbolic label supplied to the Assembler if this label was not defined 

within the assembly. 

29-32 Control section length (if not specified in the last SD or PC). 

73-80 Not used. 

FORMAT OF THE REP (User Replace) CARD 

Card 
Columns 

1 Multiple punch (12-2-9) 

Identifies this as a loader card. 
2-4 REP - Replace text card. 

5 -6 Blank. 

7 -12 Assembled address of the first byte to be replaced (hexadecimal). 

Must be right justified with leading zero's if needed to fill the field. 



FORMAT OF THE REP (User Replace) CARD ( Continued) 

Card 
Columns 

14-16 External symbol identification number (ESID) of the control section 

(SD) containing the text (hexadecimal). Must be right justified with 
leading zero's if needed to fill the field. 

17-70 From 1-11 4-digit hexadecimal fields seperated by comma's, each 

replacing two bytes. A blank indicates the end of information in 
this card. 

71-72 Blank 

73-80 May be used for program identification. 



DEBLOCK UTILITY 



npnc 



urposes : 

To block an 80/81 -byte record file to a 3440-byte record file. 

To deblock a blocked 3340-byte file in order to create an 80-byte 
SYSIN file. 

To copy files. 

To print (list) Job control statements and comments from a blocked 

To select records (or a group of records) from a blocked 3440-byte 
file in order to create an 80-byte SYSIN file. 



The program is only meant to support IBM distribution files that contain 
only 3440-byte blocked records. Eighty-byte deblocked records as output 
and 80 and/or 81-byte records as input will be processed. 

The devices used for input and output are defined by assigning the input 
device to SYS004 and the output device to SYS005. For the list function the 
output device is SYSLST. 

Block: To block an 80 or 81-byte record file to a 3440-byte record file. 

Deblock : To deblock the blocked 3440-byte file in order to create an 

80-byte SYSIN file. 

Copy : The card-to-card copy function includes 80-column to 96-column 

i for the IBM 5425 Multi-Function Card Unit. 



To determine the contents of a file with blocked 3440-byte records. 

To deblock selected PTFs from a blocked PTF file. The function 
can be used for any other 3440-byte blocked sequential file. 



Supported devices : 

IBM 2501 Card Reader 

IBM 2540 Card Read Punch 

IBM 2560 Multi-Function Card Machine 

IBM 3504 Card Reader 

IBM 3505 Card Reader 

IBM 3525 Card Punch 

IBM 5425 Multi-Function Card Unit 

IBM 2400/3400 Series Magnetic Tape Unit 

IBM 231 1 Disk Storage Drive 

IBM 2314 Direct Access Storage Facility 

IBM 2319 Disk Storage 

IBM 3330 Disk Storage 

IBM 3333 Disk Storage 

IBM 3340 Direct Access Storage Facility 

The IBM 2495 Tape Cartridge Reader does not belong to the IBM 2400 
Series Magnetic Tape Unit. 



DEBLOCK UTILITY (...Continued) 



When a disk is assigned, a //DLBL and //EXTENT card are required. The file 
names that are used for the DLBL card are : 



//DLBL UIN, 'file ID' 
//DLBL UOUT, 'file ID' 



(for input) 
(for output) 



Tape labels and the UPS I byte are not supported, except for deblocked output 
tapes. 



To create a deblocked tape, a //TLBL card or a //UPS! card are required. The 
entries that are used for the TLBL and UPSI cards are : 



//TLBL UOUT, 'file ID' 
//UPSI 00100000 



NO REWIND is always assumed for input/output tapes. Be sure that the tapes 
are correctly positioned. 



Input/Output 

Following is a table showing the input/output devices for the block, deblock, 
select and list functions : 







Block 
Input j Output 


Deblock/Select 


List 




Input 


Output 


Input 




Format 


80/81 bytes j 80 bytes 
unblocked ; 3440 blocked 


80 bytes 
3440 blocked 


80 bytes 
unblocked 


80 bytes 
3440 blocked 


Devices 


Card 
Tape 
Disk 


no | yes 


yes 


yes 
yes 
yes 


yes 



Note : SYSLST is the output device for the list function. 

Following is a table showing the input/output devices for the copy functior 





("Record 
! Format 


80/81 bytes 
unblocked 


Copy 

| Output 
: 80 bytes 
unblocked 


Dev 


: Card 

ices ; Tape 

Disk 


yes 
yes 


yes 
yes 
yes 



Input J Output 

80 bytes } 80 bytes 

3440 blocked [ 3440 blocked 



Note : When a card device is assigned to SYS004 or SYS005, the program supports 
unblocked files ; otherwise, blocked files are assumed. Be sure you mount 
a tape or disk with records of the required length. 



DEBLOCK UTILITY (...Continued) 



Input/Output (.. .Continued) 

When the block function is used, you are not allowed to define a disk storage a 
an input device or a card punch as an output device. When the deblock functic 
is used, you are not allowed to define a card reader as an input device. 



Utility Modifier Statement 

Contains information to run the program. 

The format and entries are : 

// UDS ffff 

// U Identifies the utility modifier statement. 

DS Indicates the Deblock program. 

Can be omitted 

ffff Indicates the function specification. 

Can be omitted. The default is DBL. 



ffff=BLK6 


Block function. 


ffff=COP6 


Copy function. 


ffff=DBL6 


Deblock function. 


ffff=LSrt 


List function. 


ffff=SEL, 


Select function. 



The following parameters are only required for the select function (see Control 
Statement Stream example 6). 

n Indicates the start position (column number) of the 

fixed part of the select identifier. One or two 
numerics, ranging from 1 to 80, are required. 

'ii. . .ii' Indicates the fixed part of the select identifier. All 

characters are allowed. 

ml Indicates the start position (column number) of the 

variable part of the select identifier. One or two 
numerics, ranging from 1 to 80, are required. 

m2 Indicates the end position (column number) of the 

variable part of the select identifier. One or two 
numerics, ranging from 1 to 80, are required. 

Note : It is not allowed to use apostrophes in a comment in the utility modifier 
statement for the select function. 

The select identifier consists of two parts, a fixed part that is not changed during 
the select operation, and a variable part that is changed for each select by 
reading the next selector card. 

The variable part read in from the selector card, is moved to the select identifier 
positions ml and m2. 



DEBLOCK UTILITY (. . .Continued) 



Utility Modifier Statement ( . . .Continued) 

The selector cards are placed behind the END card. 

If the fixed and variable parts overlap each other, the variable part overwrites the 
fixed part. 

The selected stream of records starts with the record that has the required 
characters in the positions specified by the select identifier. The select operation 
ends by reading a /& card from SYS004. 

The identifiers are searched in the order in which they are read in. Therefore, the 
sequence of the selector cards and the way in which they appear on the input file, 
should be identical. 

Default values 

In the following cases DBL is the default : 

• //UDS 
//U 

• not specified. 



End Statement 



This is the last control statement and cannot be omitted. 

The format is : 
//END 



Control Statement Stream 

Six examples of control statement streams to run the program from the core image 
library are given. 

1. Blocking from card to tape : 

// JOB BLOCK CARD TO TAPE 

// ASSGN SYS004,X'00C' 

//ASSGNSYS005,X'282' 

// EXEC DSTRB 

//END 

// • 



/*EOD (no embedded blanks) 

/& 



DEBLOCK UTILITY (. . . Continued) 

Control Statement Stream (. . .Continued) 

2. Deblocking from tape to disk. 

// JOB CREATE SYSINFILE 

// ASSGN SYS004,X'283' 

//ASSGNSYS005,X132' 

// DLBL UOUT, 'file ID', 99/365 

// EXTENT SYS005, ,, ,20,780 

// EXEC DSTRB 

// UDS DBL 

//END 

/& 

3. Deblocking from tape to tape. 

// JOB DEBLOCK TAPE TO TAPE 

//ASSGN SYS004,X' 180' 

//ASSGNSYS005,X'18T 

//TLBL UOUT, 'file ID* 

// EXEC DSTRB 

// UDS DBL 

//END 

/& 

4. Copying card to tape. 

// JOB COPY CARD TO TAPE 
//ASSGN SYS004,X'00C 
// ASSGN SYS005,XM81' 
//TLBL UOUT, "file ID' 
// EXEC DSTRB 
// UDS COP 
//END 
/& 

5. Listing a blocked tape. 

// JOB LIST BLOCKED TAPE 

//ASSGN SYS004,X'18T 

// EXEC DSTRB 

// UDS LST 

//END 

/& 

6. Selecting from tape. 

// JOB SELECT FROM TAPE 

//ASSGN SYS004,X' 180' 

//ASSGN SYS005,X'00C 

// EXEC DSTRB 

//UDSSEL,l,'ii...ii',9,14 

//END 

123456 

437298 

/* 

/& 



DEBLOCK UTILITY (...Continued) 



Control Statement Stream (.. .Continued ) 

If the identifiers overlap, the second part overwrites the first part. The identifiers 
are searched in the order in which they are read in. Be sure that the cards are in 
the same sequence as the selected records on the input file. 



During blocking, messages will be generated to inform you that the blocked file, 
when deblocked, will fit on 90% of a 2400-foot 7 or 9-track tape or on a 2311 
disk. Processing continues. These limits (90%) are : 

31,000 records (7-track tape) 

40,000 records (9-track 1600 BPI tape) 

45,000 records (2311 disk). 

Be sure you mount an output tape or disk that can contain the whole file. 



OVERVIEW OF PROGRAMS TO DOS/VS SYSTEMS MAINTENANCE AND GENERATION 



NAME 


PROGRAM DESCRIPTION/FUNCTION 


CSERV 


(core image library service) to punch out (or write on magnetic tape, 
disk, or diskette) programs from the core image library. 


SSERV 


(source statement library service) to punch out (or write on magnetic 
tape, disk, or diskette) macro definitions. 


RSERV 


(relocatable library service) to punch out (or write on magnetic tape, 
disk, or diskette) the relocatable modules used to build IBM-supplied 
processor programs. 


PSERV 


(procedure library service) to display on SYSLST or to punch out (or 
write on magnetic tape, disk, or diskette) procedures from the 
procedure library. 


DSERV 


(directory service) to display on SYSLST the current contents of one or 
more library directories and their remaining library capacities. The 
directory display may be either an alphabetically sorted listing or a 
listing of the entries in the order they appear in the directory. 


LSERV 


(label cylinder display) to display (on SYSLST) the label cylinders 
located on SYSRES. SYSLST may be assigned to disk, tape, printer, 
or diskette. 


ESERV 


(de-editor program) to de-edit pre-edited macros from the E-sublibrary. 
It provides SYSLST and SYSPCH output of the original macros. It also 
provides an update facility for one macro per job step. 


MAINT 


(library maintenance) to delete and/or catalog library elements, and 
also to condense and reallocate library extents. 


BACKUP 


to create a backup of the system on tape and/or to create a backup 
of private libraries on tape. The tape is suitable as input for the 
RESTORE program. 


RESTORE 


to restore the DOS/VS Distribution Tape in a partition of a current 
release of DOS/VS. The program may be executed by statements from 
SYS1PT or SYS LOG. 


COPYSERV 


to build new libraries. The program automates the comparing of the 
current library directories with the new directories and provides input 
for the CORGZ program. 


CORGZ 


(copy or merge) to selectively copy or merge library entries from one 
disk pack to another disk pack. CORGZ allows larger or smaller 
allocations for each library of the new pack. 



Note : BACKUP and RESTORE can be used efficiently to condense your 

libraries and also to migrate libraries from one DASD type to another. 



For more details on these programs, refer to DOS/VS System Control Statements, 
GC33-5376. 



CHAPTER III 

DOS/VS IOCS (GENERAl/SAM/DA^/ISAM) 



STANDARD VOLUME LABEL, TAPE OR DASD 



IBM Standard Volume Label Format (80 bytes) for EBCDIC Tape or DASD 



Field 
pNo. Volume label number 



1 


2 


Volume 

Serial 

Number 


4 


Data 
File 
Directory 


6 
Reserved 


7 
Reserved 


8 

Owner name 
& Address code 


9 
Reserved for future expansion 


_ 


-<» 


c 




S 5 


S r 


S =5 


9 5 


&> ° 


Label Volume 
Identifier | Security 











FIELD NAME AND LENGTH 

1 LABEL IDENTIFIER 

: 3 bytes 

! 2 VOLUME LABEL NR 

1 byte 



VOLUME SERIAL NR 
6 bytes 



VOLUME SECURITY 
1 byte 
(OS/VS only) 



DESCRIPTION 

Must contain VOL to indicate that this is 
a Volume Label. 

Indicates the relative position (1-8) of a 
volume label within a group of volume 
labels. 

A unique identification code which is as- 
signed to a volume when it enters an in- 
stallation. This code may also appear on 
the external surface of the volume for 
visual identification.lt is normally a nu- 
meric field 000001 to 999999, however 
any or all of the 6 bytes may be alphameric. 

Indicates security status of the volume: 
0: no further identification for each file of 
the volume is required. 
1: Further identification for each file of 
the volume is required before processing. 



FIELD NAME AND LENGTH 



DESCRIPTION 



DATA FILE DIRECTORY For DASD only. The first 5 bytes contain 
10 bytes the starting address(CCHHR)of the VTOC. 

The last 5 bytes are blank. For tape files 
this field is not used and should be recor- 
ded as blanks. 



RESERVED 

10 bytes 

RESERVED 

10 bytes 

OWNER NAME AND 

ADDRESS CODE 

10 bytes 



Reserved 



Reserved 



Ind/cates a specific customer, installation 
and/or system to which the volume be- 
longs. This field may be a standardized 
code, name /address etc. (OS/VS only). 
Reserved 



RESERVED 
29 bytes 

All reserved fields should contain blanks to facilitate their use in 
the future. Any information appearing in these fields at the present 
time will be ignored by the DOS/VS and OS/VS programs. 



STANDARD VOLUME LABEL , TAPE OR DASD (....Cont'd) 
p Field i — Volume Label number 



ANSI Standard Volume Label format and contents for ASCII tapes 



1 


2 


3 

Volume 
Serial 
Number 


4 


5 

Reserved 


6 
Reserved 


7 

Owner name and 
Identification code 


8 

Reserved 


9 


- n 


■o-io 2 




2 5 


H feS 5 


8 Kg 



Label 


f Accessibiiit 


1 Identifi 


er 


FIELD 


NAME AND LENGTH 


1 


LABEL IDENTIFIER 




3 bytes 


32 


VOLUME LABEL NR 




1 byte 


3 


VOLUME SERIAL NR 




6 bytes 


4 


ACCESSIBILITY 




1 byte 


5 


RESERVED 




20 bytes 



Must contain VOL to indicate that this 
a Volume Label. 

Must be 1 . If any other standard volume 
labels are present (indicated by an en- 
try other than 1 in this field)they are 
ignored . 

Uniquely identifies this volume. Must 
consist of 6 bytes and may be any 
character exept a quote('). 

Indicates accessibility protection: 
Space: No accessibility protection. 
Nonspace: Accessibility protection. 

Reserved for future use as required by 
the American National Standards Insti- 
stute, Inc. Should contain spaces. 



FIELD NAME AND LENGTH 
6 RESERVED 

6 bytes 



Label Standard Level 1 



Reserved for future use as required by 
American National Standards Institute, 
Inc. Should contain spaces. 



OWNER NAME AND Indicates a specific customer, installation 

IDENTIFICATION and /or system to which the volume be- 

CODE longs. This field may be a standardized 

14 bytes code, name, address etc. 



8 RESERVED 
28 bytes 

9 LABEL STANDARD 
LEVEL 

1 byte 



Reserved for future use as required by 
the American National Standards Insti- 
tute, Inc. Should contain spaces. 

Indicates whether this volume observes 
the American National Standards: 
Dec. 1: Volume observes the standards 
(1 is also the default value) 
Space: Volume does not observe the 
standards, but it follows an agreed foimat. 



STANDARD MAGNETIC TAPE FILE LABEL 



IBM Standard Tape File Label Format and Contents 



ield 














Fil 


e Security - 












1 


2 


3 
File Identifier 


4 
File 
Serial 
Number 


5 


6 


7 


8 


9 

Creation 
Date 


10 

Expiration 
Date 


1 


12 
Block 


13 
System Code 


14 
Reserved 


- CO 


«* 


m ^ 


a s 


a 5 


S 8 


$ a 


o 


S K 




? 


» 8 


— roj^ O 



L-Label Number Volume Sequence Nr- 
Label Identifier File Sequence Number 



J L 



' — Version Number of Generation 
Generation Number 



FIELD NAME AND LENGTH 

= 1 LABEL IDENTIFIER 

£ 3 bytes EBCDIC 



FILE LABEL NUMBER 
1 byte EBCDIC 

FILE IDENTIFIER 
17 bytes EBCDIC 
FILE SERIAL NUMBER 
6 bytes EBCDIC 



DESCRIPTION 

Identifies the type of label: 
HDR: Header— beginning of data file. 
EOF: End of File— end of a set of data. 
EOV: End of Volume— end of the phy- 
sical reel. 

Always a 1 

Uniquely identifies the entire file, may 
contain only printable characters. 
Uniquely identifies a file-volume relation- 
ship. This field is identical to the Volume 
Serial Number in the volume label on the 
first or only volume of a multi-volume file 
or a multi-file set. This field will normally 
be numeric(000001 to 999999) but may . 
contain any six alphameric characters. 



FIELD NAME AND LENGTH 

5 VOLUME SEQUENCE 

NUMBER 



DESCRIPTION 

Indicates the order of a volume in a given 
file or multi-file set. This number must be 
numeric(0000-9999). Multiple volumes of 
an output file will be numbered in conse- 
cutive sequence. 



Assign numeric sequence to a file v 
a multi file set. 



■ thin 



FILE SEQUENCE 

NUMBER 

4 bytes 

GENERATION NUMBER Numerically identifies the various editions 
4 bytes of the file. 

VERSION NUMBER OF Indicates the version of the generation of 
GENERATION a file. 

2 bytes 



STANDARD MAGNETIC TAPE FILE LABEL (....Cont'd) 



IBM Standard Tape File Label Format and Contents 



FIELD NAME AND LENGTH 

9 CREATION DATE 

6 bytes 



EXPIRATION DATE 
6 bytes 



FILE SECURITY 
I byte 



BLOCK COUNT 
6 bytes 



DESCRIPTION 



FIELD NAME AND LENGTH 



jr and the day of the year 


13 


SYSTEM CODE 


created: 






13 bytes 


Code 


Meaning 


14 


RESERVED 


blank 


none 




7 bytes 


00-99 


year 






001-366 


day of year 







(e.g. ,January 31,1965 would be entered as 
65031) 

Indicates the year and the day of the year 
when the file may become a scratch tape. 
The format of this field is identical to 
field 9. On a multi-file reel, processed se- 
quentially, all files are considered to expire 
on the same day. 

Indicates the security status of the file. 
Ch No security protection. 
1: Security protection. Additional identifi- 
cation of the file is required before it can 
be processed. 

Indicates the number of data blocks written 
on the file from the last header label to the 
first trailer label, exclusive of tape marks. 
Count does not include checkpoint records. 
This field is used in trailer labels. 



DESCRIPTION 

Uniquely identifies the programming 
system. (For DOS/VS: IBMDOSVStf^O 

Reserved 



STANDARD MAGNETIC TAPE FILE LABEL 



ANSI Standard Tape File Label Format and Contents 
Accessibility 



1 


2 


3 
File Identifier 


4 

Set 
identifier 


5 
File 
Section 
Numbe; 


6 


7 


8 


9 

Creation 
Date 


10 

Expiration 
Date 


li 


12 

Block 
Count 


13 
System Code 


14 

Reserved for 
ANSI 


_ n 


* 


<n cn 


cn c5 


s « 


co co 


s a 


? 


3 $ 


5 KS 


s s 


SL „_,, _,.. ,. _& 


rs m 



1 


1— File Label Number 


1 


— Label Identifier 


FIELD 


NAME AND LENGTH 


_ 1 


LABEL IDENTIFIER 


s 


3 bytes, ASCII 






2 


FILE LABEL NUMBER 




1 byte, ASCII 


3 


FILE IDENTIFIER 




17 bytes, ASCII 


4 


SET IDENTIFIER 




6 bytes, ASCII 



File Sequence Number — I 



1 Version Number of Generatio 

— Generation Number 



DESCRIPTION 

Identifies the type of label: 
HDR: Header — beginning of a data file. 
EOF: End of File— end of a set of data. 
EOV: End of Volume—end of the phy- 
sical reel. 
Indicates the sequence of this label within 
a label group(HDR,EOF, EOV).DOS/VS 
supports File Label 1 only and ignores sub- 
sequent numbers. 

Identifies the entire file. May be any cha- 
racter exept a quote('). 

Identifies the volume-file relationship. 
Generally, this field is identical to the 
volume serial number from the VOL label 
or the first or only volume of the logical 



FIELD NAME AND LENGTH 



DESCRIPTION 



FILE SECTION NUMBER Indicates the order of a volume in a given 

4 bytes file or multi-file set. (The first file must be 

numbered 0001). 



FILE SEQUENCE 

NUMBER 

4 bytes 



Assigns numeric sequence to a file withi 
a multi-file set .(The first file must be n 
beredOOOl). 



GENERATION NUMBER Numerically identifies this 



4 bytes 

VERSION NUMBER OF 

GENERATION 

2 bytes 

CREATION DATE 
6 bytes 



file. (Must be numerical or blank). 

Indicates this version of the generation ii 
field 7. (Must be numerical or blank). 



Indicates the year and the day of the year 
that this file was created (byyddd), where: 
b= blank yy= year (00-99) 
ddd=day (001-366) 



STANDARD MAGNETIC TAPE FILE LABEL (. . . .Cont'd) 



FIELD NAME AND LENGTH 



10 


EXPIRATION DATE 




6 bytes 


11 


ACCESSIBILITY 




1 byte 


12 


BLOCK COUNT 




6 bytes 


13 


SYSTEM CODE 




13 bytes 


14 


RESERVED 




7 bytes 



Indicates the year and the day of the year 
that this file may become a scratch tape. 
Same format as above (Field 9). 

Indicates the accessibility protection of 
the file. 

Space: no accessibility protection . 
Nonspace: accessibility protection. 

Indicates the number of data blocks (phy- 
sical records) written for this logical file. 

Name of programming system. 
(For DOS/VS: IBMDOSVSJ^j^) 

Reserved for future use as required by 
ANSI. (American National Standards Insti- 
tute, Inc.). Should be recorded as spaces. 



ANSI Standard Tape File Label Format and Contents 
NAME AND LENGTH DESCRIPTION 



STANDARD DASD FILE LABEL , FORMAT 1 (Format 1: This format is common to all data fil< 
r Field Creation date 



E^j 



Direct Access Storage Devices) 
qfion <fatc 



FILE IDENTIFICATION 



Serial 
Number 



Option codes [-Record length 

ey length 



Format Identifier 



Record format — ' 
Block length 



OvO- c~ o- c^ 



Last 

Record 

Pointer 



Upp.ei 



Additional Extent 



L_Volun 
Sea^e 



Additional Extent 



Data set indicators 
Key Location L 



— Extent sequence number 
—Extent type indicator 



_Bytes used in last 
block of directory 
— Extent count 



FIELD NAME AND LENGTH 

1 FILE NAME 

44 bytes,alphameric 
EBCDIC 



DESCRIPTION 

This field serves as the key portion of the 
file label. Each file must have a unique 
file name. Duplication of file names will 
cause retrieval errors. The file name can 
consist of three sections: 

1 File ID is an alphameric name assig- 
ned by the user and identifies the file. 
Can be 1-35 bytes if generation and 
version numbers are used,or 1-44 bytes 



FIELD NAME AND LENGTH 



if they are not used. 

2 Generation number. If used, this field 
is separated from File ID by a period. 

It has the format Gnnnn, where G iden- 
tifies the field as the generation number 
and nnnn (in decimal) identifies the ge- 
neration of the file. 

3 Version Nu mber of Ge neration. 

If used, this section immediately follows tr 



STANDARD DASD FILE LABEL , FORMAT 1 (. . . .Cont'd) 



FIELD NAME AND LENGTH 



DESCRIPTION 



FILENAME 
(Cont'd) 



generation number and has the format 
Vnn, where V Identifies the field as the 
version of generation number and nnn 
(in decimal)identifies the version of 
generation of the file. 
Note: DOS/VS compares the entire 
field against the filename given in the 
DLBL card. The generation and version 
numbers are treated differently by OS/VS. 
The remaining fields comprise the DATA portion of the file label: 

2 FORMAT IDENTIFIER 1 = Format 1 

1 byte, EBCDIC numeric 



FILE SERIAL NR 
6 bytes, EBCDIC 
alphameric 

VOLUME SEQUENCE 
NR ,2 bytes, binary 

CREATION DATE 
3 bytes, discontinuous 
binary 

EXPIRATION DATE 
3 bytes,discontinous 
binary 



Uniquely identifies a file/volume rela- 
tionship. It is identical to the Volume 
Serial Number of the first or only vo- 
lume of a multivolume file. 

Indicates the order of a volume relative 
to the first volume on which the data 
file resides. 

Indicates the year and the day of the 
year the file was created.lt is of the form 
YDD, where Y signifies the year(0-99) 
and DD the day of the year(l-366). 
Indicates the year and the day of the 
year the file may be deleted. The form 
of this field is the same as that of field 5. 



FIELD NAME AND LENG TH 
EXTENT COUNT 



DESCRIPTION 

Contains a count of the number of extents 
for this file on this volume. If user labels are 
used, the count does not include the user 
label track. This field is maintained by the 
DOS/VS programs. 



BYTES USED IN LAST 
BLOCK OF DIRECTORY 
1 byte, binary 

SPARE 
1 byte 

SYSTEM CODE 
13 bytes 



RESERVED 
7 bytes 

FILE TYPE 
2 bytes 



Used by OS/VS 



Uniquely identifies the programming system. 
The character codes that can be used in this 
field are limited to EBCDIC characters. On 
input, IOCS ignores this field. On output, 
IOCS inserts IBMDOSVSJ#S$#. 

Reserved 

The contents of this field uniquely identify 

the type of data file: 

Hex 4000: Consecutive organization 

Hex 2000: Direct access organization 

Hex 8000: Indexed sequential organization 

Hex 0200: Library organization 

Hex 0000: Organization not defined in the 

file label 
Hex 0008: VSAM 



STANDARD DASD FILE LABEL , FORMAT 1 (. . . .Cont'd) 



FIELD NAME AND LENGTH 

1 1 RECORD FORMAT 
1 byte 

12 OPTION CODES 



' 13 BLOCK LENGTH 

2 bytes, binary 

14 RECORD LENGTH 
2 bytes, binary 

15 KEY LENGTH 

1 byte, binary 

16 KEY LOCATION 

2 bytes, binary 

17 DATA SET 
INDICATORS 
1 byte 



DESCRIPTION 



FIELD NAME AND LENGTH 



Bits within this field indicate various options 

used in building the file: 

Bit 0: 

Bit 1: Reserved 

Bit 2: Master index present (ISAM) 

Bit 3: Independent overflow present (ISAM) 

Bit 4: Cylinder overflow present (ISAM) 

Bit 5: Reserved 

Bit 6: Delete record (OS/VS) 

Bit 7: Reorganize (OS/VS) 

Indicates the block length for fixed length 
records or maximum block size for variable 
length blocks. 

Indicates the record length for fixed length 
records or the maximum record length for 
variable length records. 

Indicates the length of the key portion of 
of the data records in the file. 

Indicates the high order position of the datd 

Bits within this field are used to indicate the 

following: 

Bit 0: If on, indicates that this is the last 



DESCRIPTION 

volume on which this file normally reside 
Bit 1,2,4,6,7: for DOS/VS-Used by 

OS/VS. 
Bit 3: If on, data set security is invoked. 
Bit 5c Used by DOS/VS and OS/VS. 



SECONDARY 
ALLOCATION 

4 bytes, binary 

LAST RECORD POINTER 

5 bytes, discontinuous 

SPARE 
2 bytes 
EXTENT TYPE 
INDICATOR 
1 byte 



Used by OS/VS 



Used by OS/VS 



Reserved 

Indicates the type of extent with which the 
following fields are associated: 
HEX CODE 

00: Next three fields do not indicate any 
extent. 

01: Prime data area(lndexed sequential), 
or Consecutive area, etc. , (i.e. , the extent 
containing the user's data records) 
02: Overflow area of an Indexed sequen- 
tial file. 

04: Cylinder index or master index area of 
an indexed sequential file. 
40: User label track area. 
80: Shared cylinder indicator. 



STANDARD DASDFILE LABEL , FORMAT 1 (....Cont'd) 



FIELD NAME AND LENGTH 



DESCRIPTION 



FIELD NAME AND LENGTH 



EXTENT SEQUENCE NR Indicates the extent sequence in a 
1 byte, binary multi-extent file. 

LOWER LIMIT The cylinder arid the track address 

4 bytes, discontinuous specifying the starting point(lower 
binary limit) of this extent component. This 

field has the format CCHH. 



ADDITIONAL EXTENT 
10 bytes 

ADDITIONAL EXTENT 
10 bytes 

POINTER TO NEXT 
FILE LABEL WITHIN 
THIS LABEL SET 
5 bytes,discontinuous 
binary 



These fields have the same format as 
the fields 21-24 above. 

These fields have the same format as 
the fields 21-24 above. 

The address (format CCHHR) of a con- 
tinuation label if needed to further describe 
the file. If field 10 indicates Indexed 
Sequential organization, this field points 
to a Format 2 file label within this label 
set. Otherwise, it points to a Format 3 file 
label, and then only if the file contains 
more than three extent segments. This field 
contains all binary zeros if no additional 
file label is pointed to. 



STANDARD DASD FILE LABEL , FORMAT 2 



Lost 2d Level Moster Index Entry Address 



V 



K2 
Address of 
2d Level 
Moster lnde> 



Last 3d Level Master Index Entry Address 



Address of 
3d Level 
Master Index 






D5 D 



r- Last Data Track in Cylinder 

pNumber Tracks for Cylinder Overflow 
-Highest "R" on high Level Index Track 
I — Highest "R" on Prime Track 

I Highest "R" on Overflow Track 

■ "R" of last Data Record on shared Track 



DD 
78? 



D11D12 



D13 DM 3 



High Record on Track Index Track - 

Tag Deletion Count - 

Non first Overflow Reference Count -T 



MJ i 



D16 



[Number Tracks for Highest Level Index 
•-Number bytes for Highest Level Index 



D18 
Address of 
Cylinder 

Index, , 



D19 
Address of 
Lowest Level 

Mtster Index, 



Bytes remaining on Overflow Track— 



D20 
Address of 
Highest Level 

Mwter. Index, 



D21 
Last Prime 
Data Record 
Address 



Last Track Index Entry Address — ' 
Last Cylinder Index Entry Address — — 



D25 
Last Indepen- 
dent Overflow 
tecord Address 



□26 327 328 329 



Number of independent Overflow Tracks 

Overflow Record Count 

Cylinder Overflow 
Area Count 



D30 



D31 



Pointer 



-Last Master Index Entry Address 



SEE NEXT PAGE FOR FURTHER EXPLANATION 



STANDARD DASD FILE LABEL , FORMAT 2 (. . ..Cont'd) 



FIELD NAME AND LENGTH 



FIELD NAME AND LENGTH 



DESCRIPTION 



K1 KEY IDENTIFICATION 

1 byte 

K2 ADDRESS OF 2d LEVEL 

MASTER INDEX 
7 bytes, discontinuous 
binary 

K3 LAST 2d LEVEL..MASTER 

INDEX ENTRY 
5 bytes, discontinuous 
binary 

: K4 ADDRESS OF 3d LEVEL 

; MASTER INDEX 

7 bytes, discontinuous 

binary 

K5 LAST 3d LEVEL MASTER 

INDEX ENTRY 
5 bytes /discontinuous 
binary 

K6 SPARE 

19 bytes 
Dl FORMAT IDENTIFIER 

1 byte, EBCDIC numeric 

D2 NUMBER OF INDEX 

LEVELS 
1 byte, binary 



This byte contains the hex code 02 in 
order to avoid conflict with a file name. 

This field contains the address of the 
first track of the second level of the 
master index, in the form MBBCCHH. 
(OS/VS only) 

This field contains the address of the 
last index entry in the second level 
of the master index, of the form CCHHR. 
(OS/VS only) 

This field contains the address of the first 
track of the third level of the master index, 
in the form MBBCCHH. 

This field contains the address of the last 
entry in the third level of the master 
index, in the form CCHHR. (OS/VS only) 



Reserved 
2: Format 2 

The contents of this field indicate how 
many levels of index are present with an 
Indexed Sequential File. 



HIGH LEVEL INDEX This field contains the number of tracks 

DEVELOPMENT determining development of Master Index. 

INDICATOR (OS/VS only) 
1 byte,binary 



.FIRST DATA RECORD 
IN CYLINDER 
3 bytes 

LAST DATA TRACK IN 

CYLINDERS 

2 bytes 

NUMBER OF TRACKS 
FOR CYLINDER 
OVERFLOW 
1 byte, binary 

HIGHEST "R" ON HIGH 
LEVEL INDEX TRACK 
1 byte 

HIGHEST "R" ON 
PRIME TRACK 
1 byte 

HIGHEST "R" ON 
OVERFLOW TRACK 
1 byte 



This field contains the address of the last 
data track on each cylinder in the form HHR. 



This field contains the address of the last 
data track on each cylinder, in the form HH. 



This field contains the number of tracks ii 
cylinder overflow area. (OS/VS only) 



This field contains the highest possible R 
on track containing high-level index 
entries. 

This field contains the highest possible R 
on prime data tracks for form F records. 

This field contains the highest possible R 
on overflow data tracks for form F records. 



STANDARD DASD FILE LABEL , FORMAT 2 (....Cont'd) 



FIELD NAME AND LENGTH 

D10 "R" OF LAST DATA 

RECORD ON SHARED 
TRACK - 1 byte 

Dll HIGH RECORD ON 

TRACK INDEX TRACK 
2 bytes 

D12 TAG DELETION 
COUNT 
2 bytes,binary 

D13 NONFIRST OVERFLOW 

REFERENCE COUNT 
: 3 bytes, binary 

; D14 NUMBER OF BYTES 

FOR HIGHEST LEVEL 
INDEX-2 bytes binary 

D15 NUMBER OF TRACKS 
FOR HIGHEST LEVEL 
INDEX 
1 byte, binary 

D16 PRIME RECORD COUNT 

4 bytes, binary 

D17 STATUS INDICATOR 

1 byte 



DESCRIPTION 

This field contains the R of the last data 
record on a shared track. 



The first byte of this 2-byte field indi- 
cates the high(0-256) record on the track 
index track. The second byte is reserved. 

This field contains the number of records 
that have been tagged for deletion. 

This field contains a count of the number 
of random references to a nonfirst over- 
flow record. 

The contents of this field indicate how 
many bytes are needed to hold the highest 
level index in main storage. 

This field contains a count of the number 
of tracks occupied by the highest level 
index. 

This field contains a count of the number 
of records in the prime data area. 

The eight bits of this byte are used for the 

following indications: 

Bit 0-1 : must remain off 

Bit 2 -. file closed for ADD or ADDRTR 

Bit 3-5 : must remain off 

Bit 6 : last block full-Bit 7: last track full 



FIELD NAME AND LENGTH 



DESCRIPTION 



ADDRESS OF CYLINDER This field contains the address of first track 



INDEX 
7 bytes 

D19 ADDRESS OF LOWEST 

LEVEL MASTER INDEX 
7 bytes 

D20 ADDRESS OF HIGHEST 
LEVEL INDEX 

7 bytes 

D21 LAST PRIME DATA 

RECORD ADDRESS 

8 bytes 

D22 LAST TRACK INDEX 

ENTRY ADDRESS 
5 bytes 

D23 LAST CYLINDER INDEX 

ENTRY ADDRESS 
5 bytes 

D24 LAST MASTER INDEX 

ENTRY ADDRESS 
5 bytes 

D25 LAST INDEPENDENT 

OVERFLOW RECORD 
ADDRESS 
8 bytes 



of the cylinder index, in the form MBBCCHH. 



track of the lo< 
level indexes,! 



ins the address of the first 
'est-level index of the high 
i the form MBBCCHH. 



This field contains the address of the first 
track of the highest level master index, in 
the form MBBCCHH. 

This field contains the address of the last 
data record in the prime data area, in the 
formMBBCCHHR. 

This field contains the address of the last 
normal entry in the track index on the last 
cylinder in the form CCHHR 

This field contains the address of the last 
index entry in the cylinder index in the 
form CCHHR. 

This field contains the address of the last 
index entry in the master index, in the form 
CCHHR. 

This field contains the address of the last 
record written in the current independent 
overflow area, in the form MBBCCHHR. 



STANDARD DASD FILE LABEL , FORMAT 2 (... .Cont'd) 



FIELD NAME AND LENGTH 

D26 BYTES REMAINING ON 

OVERFLOW TRACK 
2 bytes,binary 

D27 NUMBER OF INDEPEN- 

OVERF LOW TRACKS 
2 bytes, binary 

D28 OVERFLOW RECORD 

COUNT 

2 bytes, binary 

. D29 CYLINDER OVERFLOW 
: AREA COUNT 

' 2 bytes, binary 

D30 DUMMY TRACK INDEX 

ENTRY 

3 bytes 

D31 POINTER TO FORMAT 

3 FILE LABEL 
5 bytes 



FIELD NAME AND LENGTH 



DESCRIPTION 



This field contains the number of bytes 
remaining on current independent 
overflow track. (OS/VS only) 

This field contains the number of tracks 
remaining in independent overflow area. 

This field contains a count of the number 
of records in the overflow area. 

This field contains the number of 
cylinder overflow areas full. 

This field contains the HHR portion of 
the dummy track index entry. 
(OS/VS only) 

This field contains the address(in the 
form CCHHR) of a Format 3 file label 
if more than 3 extent segments exist for 
the data file within this volume. 
Otherwise it contains binary zeros. 
(OS/VS only) 



STANDARD DASD FILE LABEL , FORMAT 3 



Format 3: This format is used to describe extra extent segments on the volume if there 
are more than can be described in the Format 1 (and Format 2 if it exists) file label. 
This file label is pointed to by a Format 1, Format 2, or another Format 3 file label. 
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Key 
Identi- 
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Extent 1 


Extent 2 
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Extent 4 


18 


Extent 5 
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Exten 
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Upper 
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Sequence N 
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Format Identifier 






Extent 8 


Extent 9 


Extent 10 


Extent 11 


Extent 12 


Extent 13 
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00 






o 
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31 
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8 § 



FIELD NAME AND LENGTH 

1 KEY IDENTIFICATION 

4 bytes 



EXTENTS (in KEY) 
40 bytes 



FORMAT IDENTIFIER 
1 byte, EBCDIC n 



DESCRIPTION FIELD 

Each byte of this field contains the Hex code 19-54 
03 in order to avoid conflict with a data 



Four groups of fields identical in format to 
fields 21-24 in the Format 1 label are con- 
tained here. 



NAME AND LENGTH 

ADDITIONAL 

EXTENTS 

90 bytes 

POINTER TO NEXT 

FILE LABEL 

5 bytes 



Nine groups of fields identical in format 
to fields 21-24 in the Format 1 label 
are contained here. 

This field contains the address(in the form 
CCHHR) of another Format 3 label if 
additional extents must be described. 
Otherwise, it is all binary zeros. 



STANDARD DASD FILE LABEL , FORMAT 4 



This format is used to describe the Volume Table 
of Contents and is always the first label in the 
VTOC. There must be one and only one o" ' 
Format 4 file labels per volume. 



ibel in the pNu 
>ne of these I — '^ 

1 lr 



. iber of Alternate Tracks 
-VTOC Indicators 
■Number of Extents 



riNumoer or c 
r-Reserved 



1 

Key 


2 


3 
Last 
Active 
Format 1 


4 


5 
Next 
Avail, 
fr'n^r 


67 


8 
A 


8 
B 


Device Constan 


ts 9 


Size" 


■si 


"2 ' 
o|5"0 






■9c 


3 




3 S* 




8 « 


8 




§ 


$3 










EK 





Extent Sequence Number 



Format ID — ' 



—Available File Label Records. 





Extent 1 




-.1 










10A 


10B 
Reserved 


♦ tVTOC Extent 


15 
Reserved 


VSAM i w 
Timestamp ^ _° 


^<[Yf s ot'os T M stamp 

£g compatibility) 


11 


Lower 
Limit 


14 
Upper 
Limit 


fs » J ,»..la>, m ,],<§ „_„£ 


ITK3-V 00 — 


= = 


£ § 



FIELD NAME AND LENGTH 



DESCRIPTION 



Each byte of this field contains the Hex 
code 04 in order to provide a unique key. 



KEY FIELD 

44 bytes, binary 

FORMAT ID 4 : Format 4 . 

1 byte, EBCDIC numeric 

LAST ACTIVE FORMAT 1 Contains the address(in the form CCHHR) 
5 bytes of the last active Format 1 file label.lt 

is used to stop a search on a file name. 

(OS/VS only) 

NEXT AVAILABLE Contains the address(in the form CCHH) 

ALTERNATE TRACK of the next track to be assigned as an 



FIELD NAME AND LENGTH 

5 4 bytes 

6 NUMBER OF ALTER- 
NATE TRACKS 

2 bytes, binary 

7 VTOC INDICATORS 



DESCRIPTION 
alternate for a bad track. 

Contains the number of alternate tracks 
available. 



Bit 0, if on indicates no DADSM(Format 5) 

label, or DADSM label does not reflect 

true status of volume. 

Bits 1,2 not used. 

Bit 3, if on indicates a stacked pack for the 

1401/1440/1460 Emulator Program. 

Bits 4-7 are not used. 



STANDARD D ASP FILE LABEL , FORMAT 4 (. ...Cont'd) 



FIELD NAME AND LENGTH 



8A NUMBER OF EXTENTS Contains the hexadecimal constant 01, to 



indicate one extent in the VTOC. 
Reserved 



1 byte 

8B RESERVED 

2 bytes 

9 DEVICE CONSTANTS This field contains constants describing the 

14 bytes device on which the volume was mounted 

when the VTOC was created. The following 
describes each of the subfields: 

Device Size: (4 bytes)-The number of cylinders(CC) and tracks per cyl- 

= inder(HH). 

H Track Length: (2 bytes)-The number of available bytes on a track exclusive 

^ of home address and record zero. (record zero is assumed to 

be a nonkeyed record with an eight bytes data field) 
Record Overhead: (3 bytes)-The number of bytes required for gaps, check bits, 
and count field for each record. This value varies according 
to the record characteristics and thus is broken down into 
three three subfields. 

I: Overhead required for a keyed record other than the last 

record on the track. 
L: Overhead required for a keyed record that is the last 
record on the track. 
v K: Overhead bytes to be subtracted from I or L if the record 

does not have a key field. 
Flag: (1 byte)-Further defines unique characteristics of the device. 



Bits: 0-5 : Reserved 

6/7 : CC and HH must be used as 1-byte values,as in the 
case of the 2321. A tolerance factor must be applied 
to all but the last record on the track. 
Tolerance: (2 bytes)-A value that is to be used to determine the ef- 

fective length of the record on the track. The effective 
length of a record is calculated in the following manner : 

1 Add the key length to the data length of the record 

2 Test bit 7 in the flag byte : 

a. If 0, go to step 3 

b. Multiply value from step 1 by the tolerance factor 

c. Shift result 9 bits to the right 
3. Add overhead bytes to the result. 

Note : Step 2 is not required if the calculation is for the 
last record on the track. 
Labels/track: (1 byte)-A count of the number of labels that can be written 

on each track in the VTOC. (Number of full records of 
44-bytes key and 96-bytes data lengths that can be contain- 
ed on one track of this device) 
Directory Blocks/ (1 byte)- A count of the number of directory blocks that can 
Track be written on each track for an OS/VS partitioned data set. 

(Number of full records of 8-bytes key and 256-bytes data 
lengths that can be contained on one track of this device) 



STANDARD DASD FILE LABEL, FORMAT 4 (. . .Cont'd) 

FIELD NAME AND LENGTH DESCRIPTION 

9 DEVICE CONSTANTS The following illustrates the device con- 

( . . .Cont'd) stants field for the various direct access 

devices: 



FIELD NAME AND LENGTH 



10A VSAM CATALOG 
(Cont'd) (1 byte) 



Device CC 


HH 


Track 


1 


J. 


K 


Flog 


Tol. 


Labels 




TT of CRA 






Length 












Track 




(2 bytes) 


2311 203 

2314/ 

2319 203 


10 
20 


3625 
7294 


81 
146 


20 
45 


20 
45 


1 
1 


537 
534 


16 
25 




VSAM TIMESTAMP 
(8 bytes) 


2321 20/10 


5/20 


2000 


100 


16 


16 


3 


537 


8 


10B 


RESERVED 
(10 bytes) 


2301 


200 


20616 


186 


186 


53 





512 


63 


2302 250 


46 


5070 


82 


55 


20 


1 


537 


22 




3330 411 
3330-1 1 815 


19 
19 


13030 
13030 


191 
191 


191 
191 


56 
56 






512 
512 


39 
39 


11-14 


VTOC EXTENT 


3340/35MB 349 


12 


8368 


242 


242 


75 





512 


22 






3340/70MB 698 


12 


8368 


242 


242 


75 





512 


22 






3350 560 


30 


19069 


267 


267 


82 


8 


512 


46 






7320 


400 


2129 


111 


43 


14 


1 


537 


8 







RESERVED 
(25 bytes) 



Bit0-1 : This volume is owned by 

a VSAM catalog. 
Bit 1-7: Unused 

Relative track number of first track 
of catalog recovery area 



These fields describe the extent of 
the VTOC and are identical in 
format to fields 21-24 of the 
Format 1 file label. Extent type 
01 (prime date area). 

Reserved 



Note : CCHH for the 2321 above are separate 1 byte quantities. 



VSAM INDICATORS 
(19 bytes) 



VSAM TIMESTAMP 



(8 bytes) 



The VSAM indicators are present on 
any volume that contains space 
allocated to VSAM. If a volume 
does not contain any VSAM-owned 
space, these fields are set to zeros. 



Is the 



ethe rr 



t recent VSAM 
is added to the volume. 



STANDARD DASD FILE LABEL , FORMAT 5 (Note: Format 5 Label used by OS/VS only) 

rField 



Available 
Extent 



Available Extents in Key 



ni 



Available Extents 



1 — Key Identification 






' — Format Identif 


er 




Av 


ailable Extents 


28 


29 
Pointer 

Format 5 


.£_ . . 






s 


s § 



FIELD NAME AND LENGTH 

1 KEY IDENTIFICATION 

4 bytes 

2 AVAILABLE EXTENT 

5 bytes 



DESCRIPTION 
Each of these four bytes is an hex 05. 



FIELD NAME AND LENGTH 



This field indicates an extent of space avail- 10 
able for allocation to a data file. The first 
two bytes are relative track address. The next .. » p 
two are the number of full cylinders included 
in the extent. The last byte is the number of 
tracks in addition to the cylinders in the ex- 
tent. 29 



AVAILABILITY EXTENTS These fields are identical to field 2. 



IN KEY 35 bytes 

FORMAT IDENTIFIER 
1 byte EBCDIC numeric 

AVAILABLE EXTENTS 
90 bytes 

POINTER TO NEXT 
FORMAT 5 



They are in relative track address sequence. 
5 : Format 5 

These fields are the same as field 2.There are 
26 available extents fields in the Format 5 
label. 

Contains the address(in the form CCHHR) of 
the next Format 5 file label if one exists. 



LABEL INFORMATION CYLINDER 
DEVICE TYPES 



2314 

or 

2319 



3340 
(see 
Note 2) 






BG 


(USRLABEL) 


1 


BG 


(PARSTD) 


2 


F2 


(USRLABEL) 


3 


F2 


(PARSTD) 


4 


F' 


(USRLABEL) 


5 


" 


(PARSTD) 


6 


(STLABEL) 


7 


Standard Labels 


8 


for All Partitions 


9 




" 


10 








" 








' 








' 








• 


Additi 


snal Standard Labels 


18 






19 


















29 




.,,.. 



Temporary 

Standard (Permanent) 

Temporary 

Standard (Permanent) 

Temporary 

Standard (Permanent) 



Standard (Permanent) 



Note 1 : The layout of the label infor- 
mation cylinder depends on the number 
of partitions defined in your system. 
This example assumes that three partitions 
are present. For more information see 
DOSAS Serviceability Aids and 
Debugging Procedures. 

Note 2: For the 3340, a second label 
information cylinder is provided 
containing 12 standard label tracks 
for all partitions. 



LABEL Information Cylinder Layout and Record Format (see Note 1) 



LIOCS MODULE NAME VERSUS OPTIONS 



character / ^ 


1 


2 


3 


4 


5 


6 


7 


8 


CDMOD 


1 


J 


C 


F RECFORM=FIXUNB 


A CTLCHR=ASA(not 


B RDONLY=YESand 


Z WORKA and IOAREA2 DEVICE=2540,3881 










(always for TYPEFLE= 


specified if CMBND 


TYPEFLE= CMBND 


not speci fied 


1 DEVICE= 1442,2596 










INPUT, TYPEFLE= 


Y CTLCHR=YES 


C TYPEFLE= CMBND 


W WORKA= YES 


2 DEVICE=2520 










CMBNDorFUNC=l 


C CONTROL=YES 


H RDONLY=YESand 


1 IOAREA2= YES 


3 DEVICE=2501 










files) 


Z CTLCHR or CON- 


TYPEFLE= INPUT 


B WORKA and IOAREA2 


4 DEVICE^ 2540 and 










V RECFORM= VARUNB 


TROL not specified 


1 TYPEFLE= INPUT 


Z WORKA= YES not 


CRDERR 










U RECFORM= UNDEF 




N RDONLY=YESand 

TYPEFLE= OUTPUT 

O TYPEFLE= OUTPUT 


specified (CMBND 
file only) 


5 DEVICE=2520 and 
CRDERR 

6 DEVICE=3505or 
3504 

7 DEVICE= 3525 and 
FUNC=R/Por 
omitted 

8 DEVICE=2560 and 
FUNC=R/Por 
omitted 

A DEVICE= 3525 and 

FUNC=RP 
B DEVICE= 3525 and 

FUNC=RW 
C DEVICE= 3525 and 

FUNC=PW 
D DEVICE=3525and 

FUNC=I 
E DEVICE= 3525 and 

FUNC=RPW 
F DEVICE-2560 and 

FUNC=RP 



LIOCS MODULE NAME VERSUS OPTIONS (....Cont'd) 



character / ♦ 


1 


2 


3 


4 


5 


6 


7 


8 


CDMOD 
(Cont'd) 
















G DEVICE= 2560 and 

FUNC-RW 
H DEVICE=2560 and 

FUNC=fW 
1 DEVICE=2560 and 

FUNC=! 
J DEVICE=2560 and 

FUNC=RPW 
K DEVICE=5425 and 

FUNC=RP 
L DEVICE=5425 and 

FUNC=RW 
M DEVICE=5425 and 

FUNC=PW 
N DEVICE=5425 and 

FUNC=I 
O DEVICE=5425 and 

FUNC=RPW 


DIMOD 


1 


J 


J 


F always 


C non-RPS version 

of module 
V RPS data set 


B TYPEFLEOUTPUT 
(processes both in 
put and output) 

1 TYPEFLE=INPUT 


1 IOAREA2=YES 

Z IOAREA2=YES is 

not specified 


C RDONLY=YES 
D RDONLY=YESis 
not specified 


DRMOD 


1 


J 


M 


Z 


S SETDEV=YES 

Z SETDEV=YES 

not specified 


R RDONLY=YES 
Z RDONLY=YESnot 
specified 


D always 


always 


DUMOD 


1 


J 


N 


D 


1 =DUMODFI 
O =DUMODFO 


C ERROPT=YES and 

ERREXT=YES 
E ERROPT=YES 
Z neither is specified 


Z 


Y RDONLY=YES 

Z RDONLY not specified 



LIOCS MODULE NAME VERSUS OPTIONS (. ■ ■ .Cont'd) 



character /♦ 


1 


2 


3 


4 


5 


6 


7 


8 


MRMOD 


1 


J 


U 


S Address=SINGLE 
D Address=DUAL 


Z 


Z 


Z 


Z 


MTMOD 
(GET/PUT) 


1 


J 


F 


F RECFORM=FIXUNB 

(orFIXBLK) 

(EBCDIC mode) 
1 RECFORM-FIXUNB 

(orFIXBLK) 

(ASCII mode) 
V RECFORM=VARUNB 

(or VARBLK) 

(EBCDIC mode) 
R RECFORM=VARUNB 

(or VARBLK) 

(ASCII mode) 
S RECFORM=SPNUNB 

(or SPNBLK) 

(spanned records) 
U RECFORM=UNDEF 

(EBCDIC code) 
N RECFORM-UNDEF 

(ASCII mode) 


B READ=8ACK 

Z READ=f ORWARD or 

if READ is not speci 

fied 


C CKPTREC=YES 

Z CKPTREC-YES is 

not specified 


W WORKA=YES 
Z WORKA=YES is not 
specified 


E ERREXT=YES and 

RDONLY=YES 
N ERREXT=YES 
Y RDONLY=YES 
Z ERREXT and RDON 
LY not specified 


MTMOD 
(WORKFILE) 


1 


J 


F 


W always 


E ERROPT=YES 

Z ERROPT is not 

specified 


N NOTEPNT=YES 
S NOTEPNT=POINTS 
Z NOTEPNT is not 
specified 


Z always 


M ERREXT=YESand 

RDONLY=YES 
N ERREXT=YES 
Y RDONLY=YES 
Z ERREXT and RDON 
LY not specified 



LIOCS MODULE NAME VERSUS OPTIONS (. . . .Cont'd) 



character / + 


1 


2 


3 


4 


5 


6 


7 


8 


ORMOD 


1 


J 


M 


F RECFORM-FIXUNB 
X RECFORM=FIXBLK 
U RECFORM=UNDEF 
D RECFORM=UNDEF 
and BLKFAC=YES 


C CONTROL=YES 

Z CONTROL=YES is 

not specified 


1 IOAREA2=YES 
W WORK A= YES 
B both are specified 
Z neither is specified 


T device is in tape 
mode 

D device is in docu- 
ment mode 


Z always 


PRMOD 


1 


J 


D 


F RECFORMHFIXUNB 
V RECFORM=VARUNB 
U RECFORM=UNDEF 


A CTLCHR=ASA 

Y CTLCHR=YES 

C CONTROL=YES 

S STLIST=YES 

Z none of these is spe- 
cified 

T DEVICE=3525 with 
2- line printer 

U DEVICE=2560 

V DEVICE=5425 


B ERROPT=YES and 
PRINTOV=YES 

P PRINTOV=YES, 
DEVICE is not 3525 
and ERROPT is not 
specified 

1 PRINTOV=YES, 
DEVICE=3525 and 
FUNC=WCT3or 
omitted 

F PRINTOV=YES, 
DEVICE=3525 and 
FUNC=RWLT3 

C PRINTOV=YES, 
DEVICE=3525 and 
FUNC=PWCT3 

D PRINTOV=YES, 
DEVICE=3525 and 
FUNC=RPWCT3 

Z PRINTOV=YES and 
ERROPT not speci- 
fied and DEVICE is 
not 2560, 3525, or 
5425 


1 IOAREA2=YES 

Z IOAREA2=YES is 

not specified 


V RDONLY=YES 
and WORKA=YES 

W WORKA=YES 

Y RDONLY=YES 

Z neither is specified 



LIOCS MODULE NAME VERSUS OPTIONS (. . ■ .Cont'd) 



character / H 



PRMOD 
(Cont'd) 



O PRINTOV=YES not 
specified, DEVICE= 
3525 and FUNCT= 
WCT3 or omitted 
PRINTOV=YES not 
specified, DEVICE= 
3525 and F UN a= 
RWCT] 

PRINTOV=YES not 
specified, DEVICE= 
3525 and FUNCT= 
PWCT] 

PRINTOV=YES not 
specified, DEVICE= 
3525 and FUNCT= 
RPWtT] 

ERROPT=YES and 
PRINTOV=YES is 
not specified 

U FUNC=W or omitted 
and DEVICE=2560 
or 5425 

V FUNC=RWand 
DEVICE=2560 or 

W FUNC=PWand 
DEVICE=2560 or 

X FUNC=RPWand 
DEVICE=2560 or 



5425 



5425 



5425 



LIOCS MODULE NAME VERSUS OPTIONS (....Cont'd) 



character / ^ 


1 


2 


3 


4 


5 


6 


7 


8 


PTMOD 


1 


J 


E 


S SCAN=YES 
Z SCAN-YES is not 
specified 


T TRANS=YES(SCAN) 
=YES is not speci- 
fied) 

Z TRANS=YES is not 
specified 


F RECFORM=FIXUNB 

and SCAN=YES 
U RECFORM=UNDEF 

and SCAN=YES 
Z SCAN=YES is not 

specified and/or 

DEVICE=1018 


1 DEVICE=1017 

2 DEVICE=1018 

Z DEVICE=2671 or if 
this entry is omitted 


Z always 


SDMOD 
(GET/PUT) 


1 


J 


G 


C SDMODFx specifies 

HOLD=YES 
F SDMODFx does not 

specify HOLD=YES 
R SDMODUx specifies 

HOLD=YES 

U SDMODUx does not 

specify HOLD=YES 
P SDMODVx specifies 

HOLD=YES and 

RECFORM=SPNBLK/ 

SPNUNB 
Q SDMODVx does not 

specify HOLD=YES 

and specifies 

RECFORM=SPNBLK/ 

SPNUNB 
S SDMODVx specifies 

HOLD=YES 
V SDMODVx does not 

specify HOLD=YES 


1 SDMODxl (non-RPS 
version of module) 

O SDMODxO (non-RPS 
version of module) 

U SDMODxU (non-RPS 
version of module) 

W SDMODxKRPS in- 
put data set) 

X SDMODxO (RPS out. 
put data set) 

Y SDMODxU (RPS up- 
date data set) 


C ERROPT=YES and 

ERREXT=YES 
E ERROPT=YES 
Z neither is specified 


M TRUNCS=YES and 

FEOVD=YES 
T TRUNCS=YES 
W FEOVD=YES 
Z neither is specified 


B CONTROL=YES 

and RDONLY=YES 
C CONTROL=YES 
Y RDONLY=YES 
Z neither is specified 



LIOCS MODULE NAME VERSUS OPTIONS (. . . .Cont'd) 



Character / *• 


1 


2 


3 


4 


5 


6 


7 


8 


SDMOD 


1 


J 


G 


T HOLD=YES 


C ERROPT=YES and 


N 


NOTEPNT=YES 


C 


CONTROL=YES 


T RDONLY-YESand 


(WORK FILES) 








W HOLD=YES not 
specified 


ERREXT=YES 
E ERROPT=YES 
W RPS version of 

Z neither is specified 


R 

Z 


NOTEPNT=POINT 

RW 

NOTEPNT is not 

specified 


Z 


CONTROL=YES is 
not specified 


UPDATE=YES 
U UPDATE=YES 
Y RDONLY=YES 
Z neither is specified 


DAMOD 


1 


J 


1 


F RECFORM=FIXUNB 
B RECFORM-UNDEF 


A AFTER=YES 

W RPS version of module 


E 


IDLOC=YES and 
FEOVD=YES 


H 


ERREXT=YES and 
RELTRK=YES 


W HOLD=YES and 
RDONLY=YES 










handles both UNDEF 


Z AFTER is not 


1 


IDLOC=YES 


P 


ERREXT=YES 


X HOLD=YES 










andFIXUNB 


specified 


R 


FEOVD=YES 


R 


RELTRK=YES 


Y RDONLY=YES 










S RECFORM=SPNUNB 




Z 


neither is specified 


Z 


neither is specified 


Z neither is specified 










V RECFORM=VARUNB 














ISMOD 


1 


J 


H 


A RECFORM-BOTH, 


A |OROUT=ADDRTR 


B 


TYPEFLE=RANSEQ 


B 


CORINDX=YESand 


F CORDATA=YES, 










• IOROUT=ADD or 


'non-RPS version of 


G 


IOAREA2=YES 




HOLD=YES 


ERREXT=YES, 










ADDRTR 


module) 
1 |OROUT=ADD 




TYPEFLE=SEQNTL 
or IOROUT=LOAD 


C 
O 


CORINDX=YES 
HOLD=YES 


RDONLY=YES 










B RECFORM=FIXBLK, 


L |OROUT=LOAD(non- 


R 


TYPEFLE=RANDOM 


z 


neither is specified 


G CORDATA=YES 










IOROUT=ADD or 


RPS version of modul« 


5 


TYPEFLE=SEQNTL 






and ERREXT=YES 










ADDRTR 


R IOROUT=RETRVE 


z 


neither is specified 






O CORDATA=YES 










U RECFORM-FIXUNB, 


V lOROUT=ADDRTR 




(IOROUT=LOADor 






andRDONLY=YES 










IOROUT=ADD or 


(RPS version of 




ADD) 






P CORD AT A= YES 










ADDRTR 


module) 










S ERREXT=YES and 










Z RECFORM is not 


X IOROUT=LOAD 










RDONLY=YES 










specified 


(RPS version of 










T ERREXT=YES 










(IOROUT=LOAD 


module) 










Y RDONLY=YES 










or RETRVE) 












Z neither is specified 



DTFCD (Reader) 



Bytes 


Bits 


c—,. 


Function 


Dec 


Hex 


0-15 

8 

16 


00-FF 

8 

10 




1 

2 
3 

4 

5-7 




9= §501 double - CCW support 

1=OMR U ;0= Omitted 

1=ERROPT 2) ;0= Omitted 

COBOL open; ignore option 

1= GET issued 3 ); 0= GET not issued ?> 

DTF table address constants relocated by 

OPENR 

File association: 

000= READ only 

010= READ/PRINT 4 ) 

101= READ/PUNCH/PRINT 5 > 

001= READ/PUNCH 5 ) 


17-19 


U-13 






Address of logic module 


20 


14 




X'02' 
X'05' 


DTF type 

DTF type for 2560 or 5425 


21 


15 



1 
2 
3 
4 
5 
6 
7 




1= Open; 0= Closed 

First time switch 

1=1442 or 2596; 0= Other 

1= 2560, 3525 or 5425; 0= Other 

1=3504, 3505; 0= Other 

1=2 I/O areas; 0=1 I/O area 

1=2520; 0= Other 

1= 2540; 0= Other 


22 


16 




B'SSFOXOIO' 

B'HOBOOOIO' 
B'HMMMOOH' 


Normal command code (not for 

2560 or 5425): 

SS: 00= pocket 1; 01= pocket 2; 

10= pocket 3 6) 
F : 1= Column binary 3 ); 0= EBCDIC 
X: l=OMR or RCE^;0= neither 

Read command code (2560)-. 
H : 0= hopper 1 ; 1= hopper 2 
B : 0= EBCDIC; 1= column binary 

SS command code (5425). 
H: 0= hopper 1, l=+iopper 2. 
MMM: 001=sracker l,010=stacker 2. 
011=stacker 3, 100=stacker 4. 


23 


17 




B'HOBOOOIO' 


Control command code (not for 2560 

or 5425) 

Read command code (2560, 5425) 


24-27 


18-1 B 






Address of IOAREA2 


28 


1C 



1 
2-7 




1=2560; 0= Other 
1= 5425; 0= Other 
Not used 


29-31 


1D-1F 






Address of EOF routine 


32-39 


20-27 






Read CCW 


Bytes 40-4 


9 as used for a 


1 files except 2560 and 5425 files 


40-43 


28-2B 




LA&IOREG,0(14) 
NOP 


Load user pointer register 


44-49 


2C-31 




MVC 0(&BLKSIZE, 
13), 0(1 4) 
NOP 
DC X'OOOO' 


Move IOAREA to WORKA 



DTF CD (Reader) (...Cont'd) 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


The fol 


owing bytes (50-105) are used for 2501 double-CCW support. 


50-55 


32-37 






Unused CCB 


56-71 


38-47 








72 


48 



1 
2 
3 

4 

5-7 




l=OMR\p= omitted. 

l=ERROPT\ 0= omitted. 

COBOL open; ignore option 

1= GET issued 3 , = GET not issued7 

DTF table address constants 

relocated by OPENR. 

File Association 

000 = READ only , 

010 = READ/PRINT , 
101 = READ/PUNCH/PRINT D 

001 = READ/PUNCH . 


73-75 


49-4B 






Address of logic module. 


76 
77 


4C 
4D 




1 
2 
3 
4 
5 
6 
7 


X"02' 
X'05' 


DTF type. 

DTF type for 2560 or 5425. 

l=open; 0= closed 

First time switch 

1=1442 or 2596; 0= other. 

1= 2560,3525, or 5425; = other. 

1=3504 or 3505; 0= other. 

1= 2 I/O areas; = 1 O/l area. 

1= 2520; 0= other. 

1= 2540; = other. 


78 


4E 




B'SSFOXOIO' 
B'HOBOOOIO' 


Normal command code (not for 2560 

or 5425). 

SS : 00 = pocketl,.01 = pocket2, 

10 = pocket 3 . _ 
F : 1= column binar* 3 , 0= EBCDIC. 
X : 1 = OMR or RCE , = neither. 

Read command code (2560, 5425) 

H: 0= hopper 1, 1 =hopper2. 

B : = EBCDIC, 1 = column binary. 


79 


4F 




B'HOBOOOIO' 


Control command code (not for 2560 

or 5425). 

Read command code (2560, 5425). 


80-83 


50-53 






Address of IOAREA2. (If IOAREA2 is 
not specified, address of IOAREA1). 



DTF CD (Reader) (...Cont'd) 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


84 
85-87 


54 
55-57 



1 
2-7 




1 =2560; = other. 
1 =5425;0 = other. 
Not used . 

Address of EOF routine. 






88-95 


58-5F 




Read CCW. 


96-99 


60-63 


LA &IOREG, 0(14) 
NOP0 


Load user pointer register. 


100-103 


64-67 


MVC0(&BLKSIZE,13), 
NOP0 


[14) Move IOAREA to WORKA 


104-105 


68-69 


DC X'0000' 




The following bytes (50-57) are used for 3504, 3505, and 3525 associated files. 


50-53 


32-35 




DC A (name) 
B 16(15) 
B 20(15) 
DCF'0' 


If ERROPT=name . 
If ERROPT=5KIP. 
If ERROPT=IGNORE. 
If ERROPT=omitted. 


54-57 


36-39 




DCA(ASOCFLE) 


Address of associated DTF table . 
(3525 only). 


Bytes 40 onward as 


used for 2560 and 5425 files . 


40-47 


28-2F 






Stacker select CCW (2560). 
Read CCW (5425). 


48-51 


30-33 




LA &IOREG,0(14) 
NOP0 




52-57 


34-39 




MVC0(&BLKSIZE, 

NOP0 

DC X'0000' 


3), (14) Move IOAREA to WORKA 


58-63 


3A-3F 




CLC0(L,14),64(1) 


Test for end of file. 

L=4 if MODE=C; L=2 in other cases. 


64-67 


40-43 




DCC'/* ' 

DC X' 0C001022 1 


End-of-file indicator if MODE=E 
In other cases. 



DTF CD (Reader) (...Cont'd) 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


68-71 


44-47 




DC A(name) 
B 16(15) 
B 20(15) 
DCF'O' 


If ERROPT=name 2 . 
If ERROPT=SKIP. 
If ERROPT=lGNORE. 
If ERROPT=omitted. 


72-75 


48-4B 




DC A(ASOCFLE) 


Address of associated DTF table . 


76-81 


4C-51 




MVC (&BLKSIZE, 


14), 82(1) 
Move card image to IOAREA1 


82 


52 




DC &BLKSIZE.C ■ 


Buffer for card image. 



OMR only for 3504 and 3505. 

ERROPT for 2560, 3504, 3505, 3525, or 5425 READ file. 

3504, 3505, and 3525 with or without CONTROL=YES specified. 

2560, 3525, or 5425 with or without CONTROL=YES specified. 

2560, 3525, or 5425 without CONTROL=YES specified. 

Defaults topocket2 for 3504, 3505, and 3525. 

Present only when 2560, 3525, or 5425 associated files are specified 

for the input DTF . 



DTFCD (Punch) 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


0-15 


00-FF 






CCB 


16 


10 



1 
2 
3 
4 

5-7 




Not used 

1= ERROPT 3 ); 0= Omitted 

COBOL open; ignore option 

1= PUT issued 2 >; 0= PUT not issued 

DTF table address constants relocated 

by OPENR 

File Association: 

000= PUNCH only 

011=PUNCH/t>RINT 3 ) 

001=READ/fUNCH 3 ) 

101= READ/PUNCH/PRINT 3 > 

100= PUNCH/INTERPRET 3 > 


17-19 


11-13 






Address of logic module 


20 


14 




X"04' 


DTF type 


21 


15 



1 
2 
3 
4 
5 
6 
7 




1= Open; 0= Closed 

First time switch 

1= CTLCHR 

1= Fixed unblocked 

1= Variable unblocked 

1= 2 I/O areas 

1= Workarea 

1= 2 CCWs in table; 0= 1 CCW in table 


22 


16 




B'SSFOOOOr 
B'HSSSOOIT 


Normal command code: 

SS : 00= pocket 1; 01= pocket 2; 

10= pocket 3 4 > 
F : 1 = column binary; 0= EBCDIC 

Normal stacker select command code 
(2560 or 5425). 
H : 0= hopper 1 ; 1 = hopper 2 
SSS: stacker information 


23 


17 




B'HSSSOOIT 


Control command code (not for 2560 
or 5425). 

Actual stacker select command code 
(2560 or 5425) 


24-27 


18-1B 




DCA(IOAREAl-bc) 


Address of data in IOAREA1 


28-31 


1C-1F 






Bucket ') 


32-33 


20-21 




LR12,(RECSIZE) 


Undefined records only 


34-37 


22-25 




LA&IOREG,4(14) 
NOPR 


Load user pointer register 


38 


26 


0-2 
3 
4 

5 
6 

7 




Not used 
1= 5425 
1=2560 
1=3525 

1=1442 or 2596 
1=2520B1 


39 


27 




DCO ' 


Blank for eject last card 



DTFCD (Punch) (....Cont'd) 



Bytes 


Bits 


Contents 


Function 


Dec | Hex 


For all files except 2560 and 5425 files: 


40-47 


28-2F 






Punch CCW 


48-55 


30-37 






Eject CCW for last card if 2520 


For 2540 files if CRDERR is specified 


48-55 1 30-37 






Retry CCW 


56-135 ] 38-87 




DC CL80' ' 


Savearea card image 


For 3525 PUNCH/INTERPRET files 


48-55 


30-37 




Load CCW 


56-63 


38-3F 






Print CCW 


64-127 


40-7F 




DC64C * 


Print buffer 


For 3525 Associated files 


48-51 | 30-33 | | DC A(ASOCFLE) 


Pointer to associated file 


For 2560 and 5425 files 


40-47 


28-2F 




DC D'0' 


Eject CCW 
lfFUNC=RPorRPW 


48-55 


30-37 






Stacker select CCW 


56-63 


38-3F 






Punch and Feed CCW 


For 2560 PUNCH/INTERPRET files 


64-71 


40-47 






Load print head buffer 1 CCW 


72-79 


48-4F 






Load print head buffer 2 CCW 


80-87 


50-57 






Print CCW 


88-151 


58-97 




DC 64C ' 


Save area for printing line 2 


For 5425 PUNCH/INTERPRET files 


64-71 | 40-47 | | 


Print CCW 


For 2560 and 5425 Associated files 


64-67 


40-43 




DC A(ASOCFLE) 




68 


44 




DCC ' 
DC X'00 1 


If mode is EBCDIC 

If mode is Column Binary 


69- 


45- 




DC&BLKSIZE.C* 


Buffer for card image 1 



1) The bucket bytes handle undefined length records 

2) Valid for 2560 or 3525 READ/PUNCH, PUNCH/PRINT, and READ/PUNCH/PRINT files 

3) Valid for 2560 or 3525 only . (3504, 3505, 5425) non- associated files 

4) Defaults to pocket 2 for 3525 



DTFCD (Combined Reader/Punch) 



Byl 


es 


Bits 


Contents 


Function 


Dec 


Hex 


-15 


00-0F 






CCB 


16 


10 


0-1 

2 

3 

4 

5-7 




Not used 

COBOL open; ignore option 

Not used 

OPENR relocates DTF address constants 

Not used 


17-19 


11-13 






Address of logic module 


20 


14 




X'00' 


DTF type 


21 


15 






Command code (X'02 1 for 1442, X'C2' 
for 2520, 2540) 


22 


16 






Command code (X'OI' for 1442, X'09' 
for 2520, 2540) 


23 


17 






Command code (X'OT for 1442, X'09' 
for 2520, 2540) 


24-31 


18-1F 






CCW 


32-35 


20-23 






Input area address 


36-39 


24-27 






Output area address 


40-41 


28-29 






Input b locks ize 


42-43 


2A-2B 






Ouput blocksize 


44-49 


2C-31 




MVC0(&BLKS, 
13,0(14) 




50-55 


32-37 




MVC (&OUBL, 
14), 0(13) 




56-59 


38-3B 






End-of-file address 


60-67 


3C-43 






Save area 


68-73 


44-49 




MVC 1 (&OUBL-1, 
13),0(13) 




74-77 


4A-4D 




MVI 0(13),X'40' 




78-79 


4E-4F 






Constant (blanks) 


80-83 


50-53 






Constant address (bytes 78-79) 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


-15 


00-0F 






CCB 


16 


10 




1 

2 
3 
4 
5-7 




1= 2-line printer (3,4) ; 0= Other 

l=ERROPT ( 3 ' 4 ); 0= Omitted 

COBOL open; ignore option 

1= 3525; 0= Other 

OPENR relocates DTF address constants 

000= PRINT only 

011= PUNCH/PRINT 3 ) 

010= READ/PRINT 3 ) 

101= READ/PUNCH/PRINT 3 ) 


17-19 


11-13 






Address of logic module 


20 


14 




X'08" 
X'07' 


DTF type 

DTF type for 2560 and 5425 


21 


15 



1 
2 
3 

4 
5 
6 

7 




1= Open; 0= Closed 

First time switch 

1= Control character 

1= Fixed unblocked records 

1= Variable unblocked records 

1=2 I/O areas 

l=Workarea 

1= Print overflow channel 9 


For Print 


er and Car 


d Pun 


:h devices 


22 


16 




X'09' 


Normal command code •>' 


23 


17 




X'09' 


Control command code -*' 


24-27 


18-1B 




DC A(IOAREAl-bc) 


Address of data in IOAREA1 


28-31 


1C-1F 






Bucket ] ) 


32-33 


20-21 




LR 12,(RECSIZE) 
NOPR0 


For undefined records only 


34-37 


22-25 




LA &IOREG,4(14) 
NOP0 


Only if IOREG=(r) 


38-39 


26-27 






Bucket 2) 


40-47 


28-2F 




11,*,X'60',1 

9,IOAREA,X'20', 

121 


CCW- Set up Selective Tape List Control 
STUST not specified 6 ) 


48-55 


30-37 




9,IOAREA,X"20 , / 

121 

A (Name) 

DCA(ASOCFLE) 


CCW- STUST specified 6 ) 

Address of user error routine (321 1 only) 
If ASOCFLE= filename 3 ) 


For the 2 


560 and 5 


125 M 


jlti Function Card Machine 


22 


16 




X'00' 


Not used 


23 


17 




B'HHHHHHOO' 


Print head selection byte 

H= 1 specifies the corresponding head 


24-27 


18-1B 






Address of IOAREA1 



DTFPR (....Cont'd) 



Bytes 


Bits 


Contents 


Function 


Dec | Hex 


For the 2560 Mult! Funct 


ion Card Machine (Cont'd) 


28-31 


IC-1F 






Bucket 


32-33 


20-21 




LR 12,(RECSIZE) 
NOPR0 


For undefined records only 


34-37 


22-25 




LA &IOREG,4(14) 
NOP0 


Only if IOREG= (r) 


38-39 


26-27 






Number of bytes to be printed by the last 
specified print head 


40-43 


28-2B 




DC A(ASOCFLE) 
DCF'0' 


If FUNC=RW,PWor RPW 
In all other cases 


44 


2C 



1 
3 

4-7 




1= 2560 
Not used 

1= Print control switch for 2560 associa- 
ted files 
Not used 


45-47 


2D-2F 




DC 3X'00' 


Reserved for future use 


For 2560 simple files 


48-55 


30-37 






Eject CCW 


56-63 


38-3F 






Load print head buffer CCW 


64-71 


40-47 






Print CCW 


For 2560 associated files 


48-55 


30-37 






Load print head buffer CCW 


56-63 


38-3F 






Print CCW 


For 5425 files 


48-55 


30-37 






Print CCW 



1) The bucket bytes handle undefined records. Bit of byte 28 at open time determines 
the mode set of a printer with UCS. If bit 0= 1, the mode is set so that data checks 
occur if an invalid character is printed. Otherwise, mode is set to suppress data checks. 
The use of the UCS parameter determines the setting of this bit. If STLIST= YES, byte 
31 saves the STLIST control byte provided by the PUT macro. 

2) The 2 byte bucket saves print overflow conditions if CTLCHR= ASA. If STLIST=YES, 
byte 38 contains the current STLIST control byte. Byte 39 is set by the PUT macro to 
indicate spacing or skipping. (X'00' no spacing, no skipping; X'01' spacing; 

X'02' skipping). 

3) Valid for 2560, 3525 READ/PRINT, PUNCH/PRINT and READ/PUNCH/PRINT files. 

4) Valid for 3525 PRINT only files. 

5) X'05' for 3525; X'09' for other devices 

6) Valid for 1403 only 



By 


es 


Contents 


Function 


Dec 


Hex 


-15 


00-0F 




CCB 


16 


10 


X'20' 
X'08' 


COBOL open; ignore option 
DTF table address constants relo- 
cated by OPENR 


17-19 


11-13 




Address of logic module: 
GET and PUT logic if TYPEFLE= 
INPUT; PUT logic if TYPEFLE= 
OUTPUT; GET, PUT and PUTR 
logic if TYPEFLE= CMBND 


20 


14 


X'03' 


DTF type 


21-23 


15-17 




For input and output: not used 
For combined: byte 21 contains 
X'01 ' and bytes 22-23 contain 
INPSIZE 


24-31 


18-1F 


XWJOAREA^X'OO', 
BLKSIZE 


CCW 


End of ta 
added if 


ble if REQ 
WORKA is 


ORM= FIXUNB and WORKA not specified. The following bytes are 
specified. 


32-35 


20-23 


DC A(IOAREAl) 


Address of I/O area 


36-39 


24-27 


DCF'O' 


Register save area 


40-43 


28-2B 


DCF'0' 


Register save area 


. End of ta 


ble if RECf 


ORM=FIXUNB. The following bytes are added if RECFORM=UNDEF 






DCF'0' 


Register save area 






DCF'0' 

DC H'BLKSIZE' 

DCAL2(BLKSIZE-1) 


Register save area 

I/O area size 

For input files only 


The folio 


wing bytes 


are added to the table if TYPEFLE= CMBND 


32-35 


20-23 


DC A(I0AREA1+BLKSIZE) 


I/O area address for input 


36-37 


24-25 


DC H'BLKSIZE' 


B locks ize 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


-15 


00-OF 






CCB 


16 


10 


0-1 

2 

3 

4 

5-7 




Not used 

COBOL open; ignore option 

Not used 

OPENR relocates DTF table addresses 

Not used 


17-19 


11-13 






Address of logic module 


20 


14 




X'CO' 


DTF type 


21 


15 




1 

2-5 

6 

7 


BT 
B'OOOO' 
BT 
B'O' 


PIOCS switches: 
1= open; 0= closed 
Input 
Not used 
Device is 3886 
Not used 


22 


16 






Error indicator byte 


23 


17 


0-4 

5 

6 

7 


B'00000' 


LIOCS switches: 

Not used 

1= SETDEV 

1= Control passed to COREXIT 

1= FR loaded from disk 


24-31 


18-1F 






FR phasename at open time 


32-39 


20-27 






Phasename of currently used FR 


40-43 


28-2B 




X'OOOOOOOO' 


Not used 


44-47 


2C-2F 






Start address of FR area in DTF 


48-51 


30-33 






Address of four-byte pointer at the end 
of the FR area in the DTF 


52-55 


34-37 






EOF routine address 


56-63 


38-3F 






Scan CCW 


64-71 


40-47 






Read CCW 


72-79 


48-4F 






Read CCW 


80-87 


50-57 






Control CCW 


88-95 


58-5F 






Load format record CCW 


96-99 


60-63 






COREXIT routine address 


100-103 


64-67 






IOAREA1 area address 


104-107 


68-6B 






Header area address 


108-111 


6C-6F 






Exit indicator address 


112 


70 






Start of FR area 



Bytes 


Bits 


Function 


Dec 


Hex 


-15 


00-OF 




Dummy CCB 


16 


10 


0-1 

2 

3 

4 

5-7 


Not used 

COBOL open; ignore option 

Not used 

DTF table address constants relocated by OPENR 

Not used 


17-19 


11-13 




Address of logic module 


20 


14 




DTF type, (X'09 1 ) 

DTF type, (X"0A' if HEADER= YES) 


21 


15 




1 

2 
3 
4 
5 
6 
7 


PIOCS switches: 

l=Open; 0= closed 

1= Input 

1= Control 

1= Device Is 1287 

1= Header 

Reserved for future use 

1=RDLNE 

Not used 


22 


16 




Not used 


23 


17 


0-6 

7 


Not used 

1= LIOCS posts a hopper empty condition to DTF 


24-39 


18-27 




CCB 


40-47 


28-2F 




Sense CCW 


48-51 


30-33 




Lost lines (equipment check) 


52-55 


34-37 




After 9 retries for Journal tape, or after 2 retries for documents 


56-59 


38-3B 




Wrong length records 


60-63 


3C-3F 




After 4 retries for journal tape, orafter2 retries for documents 


64-67 


40-43 




Keyboard corrections 


68-71 


44-47 




Count of data check errors 


72-75 


48-4B 




Lines marked 


76-79 


4C-4F 




Total lines read (CCW chains executed) 


80 


50 



1 
2 
3 

4 
5 
6 

7 


Error Indicators: 

l=EOP 

1= Lost reference mark Indicator 

1= Late stacker selection 

1= Non-recovery error 

1= Equipment check 

1 = Wrong length record 

1 = Hopper empty 

1= Data check 


81 


51 



1 


LIOCS switches: 
1= First time 
1=2 I/O areas 



DTF OR (....Cont'd) 



Bytes 


Bits 


Function 


Dec 


Hex 


81 
(Cont'd) 




2 
3 
4 
5-7 


1 = WORK A= YES 
l=RECFORM=F!XUNB 
l=RECFORM=UNDEF 
Not used 


82 


52 




Normal command code 


83 


53 




Control command code 


84-87 


54-57 




IOAREA2 address 


88-95 


58-5F 




Read CCW 


96-103 


60-67 




Go to next line CCW 


104-111 


68-6F 




Control CCW 


112-115 


70-73 




EOF address 


116-119 


74-77 




Correction exit address 


120-123 


78-7B 




IOAREA1 address 


124-127 


7C-7F 




DCA(&BLKS-1) 


128-129 


80-81 




SR 13,&RECS 


130-131 


82-83 




LR &RECSJ3 


132-133 


84-85 




LR &IOR, 13 


134-135 


86-87 




Sense 



Bytes 


Bits 


Function 


Dec 


Hex 


-5 


00-05 




CCB indicators 


6 -7 


06-07 




Logical class and unit numbers (primary if DUAL addressing) 


8 


08 




Zero 


9 -11 


09-0B 




CCW address 


12-15 


0C-0F 




Zeros 


16 
17-19 


10 
11-13 


0-1 

2 

3 

4 

5-7 


Not used 

COBOL open; ignore option 

Not used 

DTF table address conctants relocated by OPENR 

Not used 

Address of logic module 


20 


14 




DTF type= X'OB' 


21 


15 



1 
2 
3 
4 
5 
6 
7 


Logic module option switches: 

User disengage 0= off; l=on 

Program sort mode 0= no ; 1= yes 

First time switch (after engage) 0= no; 1= yes 

Address ing= DUAL 0=no; l=yes 

Waiting 0=no; l=yes 

Read logic indicator 0=no; l=yes 

Not used 

Supervisor Initial read (after open) 0=no; 1= yes 


22-29 


16-1D 




Symbolic filename 


30 


IE 





Open/Close switch: 
0= closed; l = open 


31-33 


IF -21 




Open/Close option switches 


34-35 


22-23 




Logic module option switches 


36-39 


24-27 




Error information status 


40-41 


28-29 




Length of DTF table 


42-43 


2A-2B 




Device type indicator 


44-45 


2C-2D 




Record type 


46-49 


2E-31 




Reserved for future use 


50-51 


32-33 




I/O register 


52-55 


34-37 




End-of-file address 


56-59 


38-3B 




IOAREA2/1 address 


60-63 


3C-3F 




Document buffer size 


64-65 


40-41 




Blocking factor/Number of buffers 


66-67 


42-43 




I/O area size 


68-71 


44-47 




Record length 


72-76 


48-4C 




Sense Information 



DTFMR (....Cont'd) 



By 
Dec 


es 
Hex 


Bits 


Function 


77 


4D 




Supervisor switch 


78-79 


4E-4F 




Logical class and unit numbers (secondary, for DUAL 
addressing only) 


80-81 


50-51 




Register alignment bytes 


82-83 


52-53 




Logical class and unit numbers (primary, for DUAL 
addressing) 


84-87 


54-57 




Document buffer size 


88 


58 




Command code (4C) x 


89-91 


59-5B 




Address of last byte of first document buffer 


92 


5C 




Command code (4C) 


93-95 


5D-5F 




Address of last byte of last document buffer 


96-99 


60-63 




Stacker select routine address 


100-103 


64-67 




Address of stacker select CCW chain 


104-107 


68-6B 




Current buffer address pointer (Supervisor) 


108-111 


6C-6F 




Supervisor count 


112-113 


70-71 




Number of buffers minus 7 


114-115 


72-73 




Message indicator 


116-119 


74-77 




ERROPT routine address 


120-121 


78-79 




Logical class and unit numbers (secondary, for DUAL 
addressing only) 


122-123 


7A-7B 




Reserved for future use 


124-127 


7C-7F 




Address of last buffer given to user 


128-131 


80-83 




Address of first byte of last buffer 


132-139 


84-8B 




Channel status word (CSW) 


140-143 


8C-8F 




A^ .ess of active GET record 


144-147 


90-93 




GET counter 


148-159 


94-9F 




Reserved for future use 


For singl 


2 addressing 


160-167 


A0-A7 




CCW - Engage 


168-175 


A8-AF 




CCW - Read 


176-183 


B0-B7 




CCW - Sense 


184-191 


B8-BF 




CCW - NOP 


192-199 


C0-C7 




CCW - Stacker select 


200-207 


C8-CF 




CCW - TIC 


208-215 


D0-D7 




CCW - Control 


216-223 


D8-DF 




CCW-BN 



DTF MR (....Cont'd) 



Bytes 


Bits 


Function 


Dec 


Hex 


224-231 


E0-E7 




CCW - Read 


232-239 


E8-EF 




CCW - Sense 


240-247 


F0-F7 




CCW - Disengage 


For DUAL Address Adopter 


160-167 


A0-A7 




CCW - Engage 


168-175 


A8-AF 




CCW - Read buffer 1 


176-183 


B0-B7 




CCW - Sense 


184-191 


B8-BF 




CCW - NOP 


192-199 


C0-C7 




CCW - Read buffer 2 


200-207 


C8-CF 




CCW - MOD Sense 


208-215 


D0-D7 




CCW - Read buffer 1 


216-223 


D8-DF 




CCW - MOD Sense 


224-231 


E0-E7 




CCW - TIC to NOP 


232-239 


E8-EF 




CCW - NOP 


240-247 


F0-F7 




CCW - MOD CTL 


248-255 


F8-FF 




CCW - Stacker select 


256-263 


100-107 




CCW - MOD Sense 



DTFMT (Data Files) 



By 


es 


Bits 


Contents* 


Function 


Record 
Format 


Dec 


Hex 


-15 


00-0F 






CCB 




8 


08 




Input: X'00'- 

X'63' 
Output: X'00'- 

X'04' 
(variable) 
X'OO' (undefinec 


Buffer offset length, ASCII 

) 




16 


10 




1 
2 
3 

4 

5 




First time entered MTMOD for a 
file 

Not used 

COBOL open; ignore option 
American National Standard COBOL 
DTF table address constants reloca- 
ted by OPENR 
1 = spanned records 








6 




1= ASCII -0= EBCDIC 


V-V,S 






7 




ASCII input: 1= Length check 
ASCII output: 1= Buffer offset length 
length=4 


V 
V 


17-19 


11-13 






Address of logic module 




20 


14 




x-ir 

X'12' 
X'13' 
X'14' 


Nonstandard or unlabeled 
Standard labeled, output 
Standard labeled, input, backwards 
Standard labeled, input, forwards 




21 


15 




1 
2 




First time switch: 

l = not first-time entry 

0= first-time entry 

I = blocked 

0= unblocked 

1=2 I/O area's. 

0= 1 I/O area 








3 




1= workarea 

0= no workarea 

0= workarea, spanned 


F,U;V 
F,U,V 
S 






4 




0= output 








5 




1= backwards 
0= forwards 








6 




1= checkpoint 
0= no checkpoint 








7 




1= TRUNC required during Close 




22-29 


16-1D 






Symbolic filename 




30 


IE 






Same as command code in CCW; 
(X'Or, X'02" or X'OC) 




31 


IF 


0-4 




Bits 0-4 are used as displacements by 
OPEN to determine the location of 
variable fields of the DTF. 





DTFMT (Data F i les) ( . . . . Cont 'd) 



Bytes 


Bits 


Contents * 


Function 


Record 
Format 


Dec 


Hex 


31 


IF 




B'OlllO' 


Input 


F 


(Cont'd) 






B'01100' 


Output 


F 








B'lOOOl' 


Input 


V 








B'omr 


Output 


V 








B'onor 


Input 


U 








B'01011' 


Output 


U 






5 




l=Tape label information included 
in DTF (see bytes 88-95) 
0= Tape label information not inclu- 
ded in DTF 








6 




Used by COBOL 








7 




1= Header label and EOV informatior 
wanted 

0= No header label and EOV infor- 
mation wanted 




32 


20 



1 
2 
3 

4 

5 
6 

7 




Standard labels: l=yes; 0=no 

Labels: 1= nonstandard; 0= unlabeled 

Rewind unload: l=yes;0=no 

Rewind option: 1= no rewind; 

0= rewind 

Drive direction: 1= backwards; 

0= forwards 

User label address: l=yes; 0=no 

Tapemark option: 1= no; 0= yes 

EOF-EOV switch (used by IBM 

SORT): l=yes;0=no 




33-35 


21-23 






User label routine address 




36 


24 



1 

2 - 
3 
4 

5 




DTFPH: l=yes;0=no 

COBOL indicator: 1= yes; 0= no 

File type: 1= input; 0= output 

FEOV switch: l=yes;0=no 

EOF-EOV switch (output): 1= EOF 

0=EOV 

Open indicator: l=open; 0= closed 








6 




1= variable or spanned records 


V,S 






7 




1= undefined records 


U 


37-39 


25-27 






EOF address 




40-43 


28-2B 






Block count 




44-47* 


2C-2F 




BXH 11,12, 
24(15) 


Forward 


F 








BXLE 11,12 


Backward 


F 








24(15) 












L &VARBLD, 


If VARBLD parameter is used 


V 








DEBLOCKER 












NOP 0(0) 




S 








DCF'O' 


DEB LOCKER 1 


U 



DTFMT (Data Files) (... .Cont'd) 



Bytes 


Bits 


Contents* 


Function 


Record" 
Format 


Dec 


Hex 


48-51 


30-33 




LA 14,1(14) 




F,V,S 








BCTR 14,0 + 


Backward 


F,V,S 








NOPRO 












L &RECSIZE, 


If RECSIZE given 


U 








DEBLOCKER1 












NOP 0(0) 


For input if not NOP 


U 


52-55 


34-37 




L &IOREG, 
DEBLOCKER1 


If IOREG specified 


F 








L &IOREG, 


If IOREG specified 


V 








DEB LOCK ER5 












LEIOREG, 


If IOREG specified 


U 








DEB LOCK ER2 












NOP 0(0) 


If no IOREG 










L &RECSIZE, 


If spanned input 


S 








IJFVSREC 












ST &RECSIZE, 


If spanned output 


S 








IJFVSREC 






56-63 


38-3F 






CCW 




64-67 


40-43 




DC AdOAREAl) 
DC A(IOAREAl 
+BLKSIZE-1) 
DC A(IOAREA2) 
DC A(IOAREA2 
+BLKSIZE-1) 


One I/O area 

One I/O area, read backward 

Two I/O area's 

Two I/O area's, read backward 




68-71 


44-47 




DCF'0' 


Input 


F 








DCA(IOAREAl 


Input backward: DEB LOCKER 1 


F 








+BLKSIZE- 












RECSIZE) 












DCA(IOAREAl) 


1 I/O area, output: DEB LOCKER 1 


F 








DC A(IOAREA2) 


2 I/O area's, output: DEB LOCKER I 


F 








DC A(BLKSIZE) 


DEBLOCKERI: EBCDIC 


V,S 








DC A(IOAREAl) 


1 I/O area: DEB LOCK ER2 


u 








DC A(IOAREA2) 


2 I/O area's: DEB LOCK ER2 


u 


72-75 


48-4B 




DCF'RECSIZE' 


Forward: DEB LOCK ER2 


F 








DCF'-RECSIZE' 


Backward: DEBLOCKER2 


F 








DC A(IOAREAI) 


1 I/O area: DEB LOCK ER2 


V,S 








DC A(IOAREA2) 


2 I/O area's: DEBLOCKER2 


V,S 








LA 14,1(14) 


Forward 


U 








BCTR 14,0 + 


Backward 


U 








NOPRO 






76-79 


4C-4F 




DCF'0' 


Input forward: DEBLOCKER3 


F 








DC A(IOAREAl 


Input backwards: DEBLOCKER3 


F 








+BLKSIZE - 












RECSIZE) 












DC A(IOAREAl 


Output, I I/O area: DEBLOCKER3 


F 








+BLKSIZE-1) 












DC A(IOAREA2 


Output, 2 I/O area's: DEBLOCKER3 


F 








+BLKSIZE-1) 







DTFMT (Data Files) (. . . .Cont'd) 



Bytes 


Bits 


Contents 


Function 


Record 
Format 


Dec 


Hex 


76-79 






DCF'O' 


DEBLOCKER3 


V,S 


(Cont'd) 






DC Y(BLKSIZE) 


(Bytes 76-77 only) 


u 








DCY(BLKSIZE 
-1) 


(Bytes 78-79 only) 


u 


80-83 


50-53 




DCY(BLKSIZE) 
+ Y(BLKSIZE-1) 


Forward 


F 








DC &(BLKSIZE) 


Backward 


F 








+Y(BLKS1ZE+1) 












DCF'O' 


DEB LOCK ER4 


v,s 








LR 12,RECSIZE 


(Bytes 80-81 only) 


U 








DC H'O' 


(Bytes 82-83 only) 


U 


84-87 


54-57 




DC Y(RECSIZE 

-1) 

DC 2X'00' 


(Bytes 84-85) 


F 








(Bytes 86-87) Output, Standard labels 


F 








DC A(IOAREAl 


1 I/O area: DEBLOCKER 5, EBCDIC 


v,s 








+4) 












DC A(IOAREA2 


2 I/O area's: DEBLOCKER 5, EBCDIC 


v,s 








+4) 












DC A(IOAREAl 


1 I/O area: DEB LOCK ER5, ASCII 


V 








+BUFOFF) 












DC A(IOAREA2 


2 I/O area's: DEBLOCKER5, ASCII 


V 








+BUFOFF) 












DC2X'00' 


(Bytes 84-85 output only) 
Standard labels; reserved for OPEN 


F,U 








B 28(15) 


Input only, ERROPT= omitted 


U 








B 24(15) 


Input only, ERROPT= SKIP 


U 








B 28(15) 


Input only, ERROPT= IGNORE 


U 








DC A(ERROPT) 


Input only, ERROPT= ADDRESS 


U 


88-91 


58-5B 




DC A(WLRERR) 
B 24(15) 

B 28(15) 


Input only, WLRERR= ADDRESS 

Input only, WLRERR omitted and 

ERROPT=SKIP 

Input only, WLRERR omitted and 

ERROPT= IGNORE or omitted 










DC 2X'00' 


Output only, standard labels (bytes 
88-89), reserved for OPEN 


i 1 








DC A(ERROPT) 


Input only, WLRERR omitted and 
ERROPT= ADDRESS 


1 


90-95 


5A-5F 




DC 6X'00' 


File serial number, Standard labels, 
Output only 


I 


92-95 


5C-5F 




DC A(ERROPT) 


Input only, ERROPT= ADDRESS 
Output, nonstandard labels only. 
ERROPT= ADDRESS 


1 








B 28(15) 


Input only, ERROPT= omitted 


i 








B 24(15) 


Input only, ERROPT= SKIP 


*< 








B 28(15) 


Input only, ERROPT= IGNORE 




96-99 


60-63 




DC 4X'00' 


Volume sequence number, Standard 
labels, output only 




96-97 


60-61 




DC2X'00' 


Standard labels, input only, reservec 
for OPEN 





DTFMT (Data Files) (. . . .Cont'd) 



Bytes 


Bits 


Contents* 


Function 


Record 
Format 


Dec 


Hex 


98-103 


62-67 




DC 6X'00' 


File serial number, Standard labels, 
Input only. 


o 1 


100-103 


64-67 




DC 4X'00' 


File sequence number, Standard 
labels, output only 


?■ 


104-107 


68-6B 




DC4X'00' 
DC A(ERROFT) 


Volume sequence number, Standard 
labels, input only 
Output only, Standard labels only. 
ERROPT= ADDRESS 


§- 


108-111 


6C-6F 




DC 4X'00' 


File sequence number, Standard 
label, input only 


2. 


88-91 


58-5B 




DCF'O' 


DEBLOCKER6 




92-95 


5C-5F 




DC A(ERROPT) 


Output only, Nonstandard labels 
only. ERROPT= ADDRESS 




92-93 


5C-5D 




DC Y(BLKSIZE) 

DC Y(BLKS1ZE 

-4) 

DC Y(BLKSIZE 

-BUFOFF) 


Input only 

Output only. EBCDIC 










Output only: ASCII 


(Vonly) 


94-95 


5E-5F 




DC Y(BLKSIZE 
-1) 






96-97 


60-61 




DC Y(RECSIZE 

-1) 

DC H'0' 




7 


98-99 


62-63 




Input only: Residual count 


3 

(O 


100-103 


64-67 




DC A(WLRERR) 
B 24(15) 

B 32(15) 


Input only, WLRERR= ADDRESS 

Input only, WLRERR= omitted and 

ERROPT=SKIP 

Input only, WLRERR= omitted and 

ERROPT= IGNORE or omitted 


100-101 


64-65 




DC 2X'00' 


Output only, Standard labels, reser- 
ved for OPEN 


I 


104-107 


68-6B 




DC A(ERROPT) 
B 28(15) 
B 24(15) 
B 28(15) 
DC A(ERROPT) 


Input only, ERROPT= ADDRESS 
Input only, ERROPT= omitted 
Input only, ERROPT= SKIP 
Input only, ERROPT= IGNORE 
Output, Nonstandard labels only 
(version 3 onward); ERROPT=ADDRE« 


8. 

S 


108-111 


6C-6F 




DC 4X*00' 


Volume sequence number; Standard 
labels, output only 




108-109 


6C-6D 




DC 2X*00' 


Standard labels, input only; Reservec 
for OPEN 




110-115 


6E-73 




DC6X-00' 


File serial number; Standard labels, 
input only 




112-115 


70-73 




DC 4X'00' 


File sequence number; Standard labe 
output only 


>, 



DTFMT (Data Files) (....Cont'd) 



Bytes 


Bits 


Contents* 


Function 


Record 
Format 


Dec 


Hex 


116-119 


74-77 




DC A(ERROPT) 


Output only, ERROPT= ADDRESS, 
Standard labels only 


Is 


116-119 


74-77 




DC4X'00" 


Volume sequence number; Standard 
labels, input only 


i-l 


121-123 


78-7B 




DC4X'00' 


File sequence number; Standard 
labels, input only 


li 


86-91 
88-91 


56-5B 
58-5B 




DC 6X'00' 
DC A(WLRERR) 


File serial number; Standard labels, 

output only 

Input only; WLRERR= ADDRESS 










B 24(15) 
B 28(15) 
DC A(ERROPT) 


Input only; WLRERR= omitted and 

ERROPT=SKIP 

Input only; WLRERR= omitted and 

ERROPT= IGNORE or omitted 

Input only; WLRERR= omitted and 

ERROPT= ADDRESS. Output only; 

nonstandard labels, ERROPT= ADDRE 


;s 


92-95 


5C-5F 




DC 4X'00' 


Volume sequence number; Standard 
labels, output only 


§_ 


92-93 


5C-5D 




DC 2X'00' 


Standard labels; input only, Reserved 
for OPEN 


2. 


94-99 


5E-63 




DC 6X'00' 


File serial number; Standard labels, 
input only 


o 


96-99 


60-63 




DC4X'00' 


File sequence number; Standard 
labels, output only 


° 


100-103 


64-67 




DC 4X'00' 


Volume sequence number; Standard 
labels, input only 




100-103 


64-67 




DC A(ERROPT) 


Output only; Standard labels only, 
ERROPT= ADDRESS 




100-103 


64-67 




DC 4X'00' 


Volume sequence number; Standard 
labels, output only 




104-107 


68-6B 




DC4X'00' 


File sequence number; Standard 
labels, input only 




100-103 


64-67 




DC A(WLRERR) 
B 24(15) 

B 32(15) 


Input only; WLRERR= ADDRESS 

Input only; WLRERR= omitted and 

ERROPT=SKIP 

Input only; WLRERR= omitted and 

ERROPT= IGNORE or omitted 


i 


100-101 


64-65 




DC2X'00' 


Output only; Standard labels, 
reserved for OPEN 


^ 


102-107 


66-6B 




File serial 

number 


Standard labels, output only 


o 


100-103 


64-67 




DC 4X'00' 


Output only; ERROPT= ADDRESS 
Nonstandard labels only 


■^ 



DTFMT (Data Files) (■ . . .Cont'd) 



Bytes 


Bits 


Contents* 


Function 


Record 
Format 


Dec 


Hex 


100-123 


64-7B 




DC 24X'00' 


Output only; ERROPT= omitted, 
nonstandard labels 




104-107 


68-6B 




DC A(ERROPT) 
B 24(15) 
B 24(15) 
B 28(15) 


Input only; ERROPT= ADDRESS 
Input only; ERROPT= omitted 
Input only; ERROPT=SKIP 
Input only; ERROPT= IGNORE 




104-107 


68-6B 




DC A(ERROPT) 


Output only; ERROPT= ADDRESS, 
nonstandard labels 




108-123 


6C-7B 




DC 16X'00' 


Output only; ERROPT= ADDRESS , 
nonstandard labels 




108-111 


6C-6F 




Volume sequen- 
ce number 


Standard labels, output only 




112-115 


70-73 




File sequence 
number 


Standard labels, output only 




116-119 


74-77 




DC A(ERROPT) 


Output only, ERROPT= ADDRESS, 
standard labels 




120-123 


78-7B 




DC 4X'00' 


Output only, ERROPT= ADDRESS, 
standard labels 


? 


108-123 


6C-7B 




DC 16X'00' 


Input only, nonstandard labels 


la 


108-109 


6C-6D 




DC 2X'00' 


Standard labels, input only, reserved 
for OPEN 


!- 


110-115 


6E-73 




File serial 
number 


Standard labels, input only 


o 


116-119 


74-77 




Volume sequen- 
ce number 


Standard labels, input only 


"*■ 


120-123 


78-7B 




File sequence 
number 


Standard labels, input only 




124-127 


7C-7F 




DCF'0' 


Full word for loading and storing 
USER RECSIZE: IJFVSREC 




128 


80 



1 
2 
3 
4 
5 

6 

7 


DC X'00" 


IJFVSFLG 
Sign bit, not used 
Skip to first segment 
First segment 

Segment out of sequence, input only 
Read back for EOV, output only 
File reversed for logical spacing; 
Input CNTRL only; Trunc issued, out- 
put only 

User Trunc issued, output only 
Multi segment, output only; Skip Ge 
segment, input CNTRL only 




129-131 


81-83 




DC 3X'00' 


Pointer within WORKA 





DTFMT (Data Files) (....Cont'd) 



* The format of the tape data file DTF is different starting at byte 44. 

The location indicated by the numbers in the left hand column can contain only 
one of the factors listed under Contents . 

The factor used for any given DTF table is determined by whether the file record 
format is fixed, variable or undefined, and by other DTF parameters as indicated. 
A blank in the record column indicates that the contents apply to all record types. 

• Record Format expl anation 

F = Fixed Record 

V = Variable 

U = Undefined 

S = Spanned (variable format superset) 

The deb lockers are scratch areas used by the modules to save data from one GET/ 
PUT macro instruction to another. In the text and listings, they are referred to by 
the names DEBLOCKER1 to 6. These are not labels; they are comments used to 
make it easier to follow the listings. 



DTFMT (Workfiles) 



Bytes 


Bits 


Function 


Dec 


Hex 


-15 


00-0F 




CCB 




16 


10 


0-1 

2 

3 

4 
5-7 


Not used 

COBOL open; ignore option 

1 = VOL1 label is at user specified density 

1= DTF table address constants relocated by OPENR 

Not used 




17-19 


11-13 




Address of logic module 




20 


14 




DTF type=X , 10' 




21 


15 



1 

2 
3 

4 
5 
6 

7 


1= No rewind 

1= Rewind unload 

l=Workfile 

1= Read backward 

1 = Write 

l=POINTW 

Not used 

I = Forward-space file before next operation 




22-23 


16-17 




Not used 




24-25 


18-19 




Record length 




26-27 


1A-1B 




Maximum BLKSIZE 




28 


1C 




Read command code (X'02 1 for read forward; X'OC for read 
backward) 


29-31 


1D-1F 




EOF address 




32-39 


20-27 




CCW 




40-43 


28-2B 




Block count, initialized 00000000 for read forward, 00400000 
for read backward 


44 


2C 



1 
2 
3 
4-7 


1= Error routine 

1= Ignore 

Not used 

1= Record fixed unblocked 

Not used 




45-47 


2D-2F 




DC A(ERROPT) Address of error routine 





DTFSD (Doto Files) 



DTF Assembly 
Lobel 


Bytes 


Bits 


Function 


Dec 


Hex 


&Filename 


-15 


00-0F 




Command Control Block (CCB) 




16 


10 



1 
2 
3 

4 
5 

6 

7 


1= Dequeue old volume extents 

1= Dummy OPEN to obtain extents from label track 

1= File assigned 'IGN' (COBOL) 

1= Track hold option specified 

1=DTF relocated by OPENR 

1= Input trailer labels to be processed at close time 

(COBOL only) 
1= Spanned processing 
1= COBOL end-of-extent option specified 




17-19 


11-13 




Address of logic module 




20 


14 




DTF type for OPEN/CLOSE (X'20'= sequential 
access DASD files) 




21 


15 



1 
2 
3 

4 


1=2321 (version 1/2 only) 

1= Blocked file 

1 = Work file 

l=Workarea specified 

l=Not a Version 1 type table . _— — — 








5 
6 

7 


1= Open; 0= closed ■ __ ....^-- •— 
1= Input; 0= output " ~"~ 
1= User labels specified 




22-28 


16-1C 




Filename (DTF name) 




29 


ID 




Device type code: 

X'00'=2311 Note: 

X'01'= 2314,2319 In previous versions, last 

X'02'= 2321 byte of filename contains 
X'04"= 3330-1,-2 device type code 
X'05'= 3330-11 
X'07 ,= 3350 
X'08*= 3340 general 
X'09'= 3340 35MB 
X'OA'= 3340 70MB 




30-35 


1E-23 




Address of Format 1 label in VTOC (BCCHHR) 




36-37 


24-25 




Volume sequence number 




38 


26 




1 
2 
3 
4 
5 
6 
7 


1 
2 
3 
4 
5 


Open communication byte: 
Input file 

1= No more extents 

1= Update file 

1= Process trailer labels 

1= Exit to user's EOF routine 

1= Next extent on new volume 

1= Return to close routine 

1= Process header labels 

1= Extent switch 

Output file 

l=No more extents 

1= Extents needed at close time 

1= Process trailer labels 

1= Process header labels 

1= Next extent on new volume 

1= Extents entered via console 



DTFSD (Data Files) (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




38 






Output file (Cont'd) 




(Cont'd) 


6 


1= Process trailer labels at close 








7 


1= Check extent for minimum of 2 tracks 




39 


27 




1 
0-7 


1= Extent bypassed before file is opened (input 

only) 

1= FEOVD has been issued (input only) 

Sequence number of current extent opened 

(Output only) 




40 


28 




Sequence number of last extent opened 




41-43 


29-2B 




Address of user's label routine 




44 


2C 




1 
2-6 

7 


not used 

1= Device supports RPS 

not used 

1= DTF has been extended into the partition 

virtual area 




45-47 


2D-2f 




Address of IOAREA1 




48-51 


30-33 




CCHH address of user's label track (X '80000000') 




52-53 


34-35 




Lower head limit (HH) 




54-57 


36-39 




Extent upper limit (CCHH) 


&Filename.S 


58-59 


3A-3B 




Seek address (BB) : 

X'0000' if a disk device 

X'OOnn' if 2321; where nn=bin number 




60-63 


3C-3F 




Search argument (CCHH) 




64 


40 




Record number 




65-67 


41-43 




EOF address if input file ; Key length and data 
length if output file 




68-71 


44-47 




CCHH control field : 
CCHH=x'00C80009' if 2311 - type 1 
CCHH=X*00C80013' if 2314 or 2319 - type 1 
CCHH=X' 1309041 3' if 2321 - type 1 
CCHH=X*01940012' if 3330 - type 1 
. CCHH=X '0328001 2' if 3330-11 - type 1 
CCHH=X'015C000B' if 3340 35MB 
CCHH=X '02B8000B • if 3340 70MB 
CCHH=X'022B001D' if 3350 - type 1 

where nn= current upper head number 




72 


48 




Number of records per track (input) or number of 
records per track - minus one (output) 




73 


49 




1 

2 
3 

4 


Switch byte used by the logic modules for various 
switching purposes. Functions indicated are for 
the ON condition(l) of the respective bit. 

Fixed length Record Modules 

Not first entry after Open (INPUT and UPDATE) 

Not first write after Open (OUTPUT) 

Short record' (INPUT and UPDATE without 

truncation) 

Partial block written (OUTPUT) 

ERROPT= SKIP (INPUT); TRUNC= YES (OUTPUT) 

End-of-file record written (OUTPUT) 

End of extent (UPDATE) 



DTFSD (Data Files) (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


bee 


Hex 




73 






Fixed length Record Modules (Cont'd) 




(Cont'd) 




5 
6 

7 



1 

2 

3 
4 
5 

6 

7 



1 
2 
3 
4 
5 
6 
7 


Truncation not specified (used by OPEN routines) 
Write block of records (UPDATE) 
End of file (UPDATE) 

Variable length Record Modules 

Not first entry after OPEN (INPUT and UPDATE) 
Write record (OUTPUT) 
Wrong length record (INPUT); TRUNC=YES 
(OUTPUT); Second GET operation performed (UP- 
DATE) 

Return to close routine (OUTPUT) 
Update specified (UPDATE) 
Not first entry after OPEN (OUTPUT) 
New extent required by CLOSE 
Capacity of I/O area exceeded (OUTPUT) 
Second GET required (UPDATE) 
Not first read (INPUT) 
Second GET issued (UPDATE) 
Unnecessary to read (INPUT) 
Track capacity exceeded (OUTPUT) 
Save record count (UPDATE) 

Undefined length Record Modules 

Not first entry after OPEN (ALL modules) 

Save record count (UPDATE) 

Return to close routine (OUTPUT) 

Second GET issued (UPDATE) 

Not used 

PUT command issued (UPDATE) 

End of file reached (UPDATE) 

Multi-track operation (UPDATE) 




74-75 


4A-4B 




Block size minus 1 




76-80 


4C-50 




CCHHR= Extent lower limit and record number. 
Field is used as a search argument bucket by the 
logic modules 




81 


51 


1 


l=FEOVD has been issued (output only) 




81-83 


51-53 




Address of user wrong- length record routine if 
input file; Track capacity counter if output file 




84-87 


54-57 




Instruction to load user's register IOREG. 
(Note: This field is a NOP unless blocked records 
are processed in one I/O area, or two I/O areas 
are specified and records are processed in the 
I/O areas) 




88-91 


58-5B 




Address of current available input/output area 




92-95 


5C-5F 




Logical record size 




96-99 


60-63 




Address of end of input/output area 



DTF SD(Dota Files) (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




100 


64 



1 
2 
3 

4 
5 

6 
7 


Logical indicators: 

l=ERROPT= address 

1= ERROPT= IGNORE 

1= ERROPT= SKIP 

1=VERIFY=YES 

1=2 I/O areas 

1=WLRERR= address (fixed length and variable 

records) 
1= Output file (undefined length records) 
1 = Fixed- length records 
0= Varioble or undefined length records 
Control parameter specified 




101-103 


65-67 




Address of user's read error routine 




104-111 


68-6F 




Seek CCW 




112-119 


70-77 




Search ID Equal CCW 




120-127 


78-7F 




TIC CCW 




128-135 


80-87 




Read/Write Data CCW 



This is the end of the common portion of the DTFSD table. The following sections are a 

on the parameters specified in the operand of the DTFSD macro instruction. 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Record 
Format 


Dec | Hex 


If RECFORM= FIXBLK and TRUNCS= YES 


1 

8 
3. 

1 




136-143 
144-151 


88-8F 
90-97 




Read count CCW 
Count field input area 


If CONTROL= YES, the following section is added 


152-167 
168-175 


98-A7 
A8-AF 




Control CCB 
Control CCW 


If UPDATE= YES 




136-143 
144-151 
152-159 


88-8F 
90-97 
98-9F 




Search ID Equal CCW 
TIC CCW 
Verify CCW 


If CONTROL= YES, the following section is added 


160-175 
176-183 


A0-AF 
B0-B7 




Control CCB 
Control CCW 


If RECFORM= FIXBLK, TRUNCS= YES and UPDATE= YES 




136-143 
144-151 


88-8F 
90-97 




Read Count CCW 
Search ID Equal CCW 



DTFSD (Data Files) (. . . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Record 
Format 


Dec | Hex 


If RECFORM=FIXBLK, TRUNCS= YES and UPDATE= YES (Cont'd) 


8 

•a 




152-159 

160-167 
168-175 


98-9F 

A0-A7 
A8-AF 




TICCCW (Bytes 158-159 contain saved 
block length if two files are using same 
logic module) 

Verify CCW 

Count field input area 


If CONTROL= YES, the following section is added 


176-191 
192-199 


B0-BF 
C0-C7 




Control CCB 
Control CCW 


If TRUNCS or UPDATE are not specified, no additions are made to the DTFSD 
table except when CONTROL= YES is specified, the following section is added. 




136-151 
152-159 


88-97 
98-9F 




Control CCB 
Control CCW 




136-143 
144-151 
152-159 


88-8F 
90-97 
98-9F 




Search ID Equal CCW 

TICCCW 

Verify CCW 


8 
3. 

(Q 

■o 

a" 


If CONTROL is not specified 


160-163 


A0-A3 




End-of-extent routine address (primarily 
used by COBOL compiler) 


If CONTROL= YES 


160-175 
176-183 
184-187 


A0-AF 
B0-B7 
B8-BB 




Control CCB 

Control CCW 

End-of extent routine address (primarily 

used by COBOL compiler) 




136-143 


88-8F 




Read count CCW 


111 

!§ 1 


If UPDATE is not specified: 




144-15l| 90-97 1 1 Count field input area 


If CONTROL=YES* 


152-167 
168-175 
176-179 
180-183 


98-A7 
A8-AF 
B0-B3 
B4-B7 




Control CCB 
Control CCW 
Logical record length 
RX type instruction 



* These bytes are always generated when spanned processing is specified 



DTFSD (Data Files) (. . . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Record 
Format 


Dec | Hex 


If UPDATE is 


not specified: (Cont'd) 




3 £, a 

Iff 

I 3*8 




If CONTROL= YES (Cont'd) 


184 


B8 



I 

2 
3-7 


Not used 

1= Skip segment 

1= Spanned first time 

Not used 




185-187 


B9-BB 




Pointer in logical record 


=•§.3. 


If UPDATE= Y 


ES: 




~ cf 




144-151 


90-97 




Search ID Equal CCW 




152-159 


98-9F 




TICCCW 


*-? 




160-167 


A0-A7 




Verify CCW 






168-175 


A8-AF 




Count field input area 


5-3 




176-183 


B0-B7 




Count field save area if one I/O area 


8 ? 




184-191 


B8-BF 




Count field save area if two I/O areas 


1 I 

-n a. 


If CONTROL=YES* 




192-207 


CO-CF 




Control CCB 




208-215 


D0-D7 




Control CCW 






216-219 


D8-DB 




Logical record length 






220-223 


DC-DF 




RX type instruction 






224 


E0 



1 
2 
3 
4 
5 
6 
7 


Not used 

1= Skip segment 

1= Spanned first time 

1= Null segment 

1= Spanned PUT return 

Not used 

Not used 

1= No update 


<: 

n 5' 
3. 5" 

II 




225-227 


E1-E3 




Pointer in logical record 


2. 




228-235 


E4-EB 




Count save area 






236-239 


EC-EF 




Extent status save area 






136-143 


88-8F 




Search ID Equal CCW 


<: 




144-151 


90-97 




TICCCW 


- 




152-159 


98-9F 




Verify CCW 


I I- 




160-163 


A0-A3 




Space remaining in output area 


~* <a 




164-165 


A4-A5 




Track capacity 


sT iT 




166-169 


A6-A9 




Instruction to load user's register VARBLD 
(If VARBLD is not specified, instruction 
is NO-OP) 


§L 



These bytes are always generated when spanned processing is specified 



DTFSD (Data Files) (....Cont'd) 



DTF Assembly 
Label 


Bytes 




Function 


Record 


Dec | Hex 






If CONTROL= YES * 


<: 


170-172 


AA-AC 




Not used 




173-175 


AD-AF 




End-of-extent routine address (primarily 
used by COBOL compiler) 


II 




176-191 


BO-BF 




Control CCB 


5 -i 




192-199 


C0-C7 




Control CCW 


8 




200-203 


C8-CB 




Logical record length 






204-207 


CC-CF 




RX type instruction 






208 


DO 




1 
2 
3 
4 
5 
6 
7 


Not used 

Not used 

1= Leading segment 

1= Output block truncated 

1= End of track 

1= Track truncated 

1= Save count 

1= Volume spanned 


^ f 




209-211 


D1-D3 




Pointer in logical record 


S. 




212-219 


D4-DB 




Count save area 






220-223 


DC-DF 




Extent status save area 






136-143 


88-8F 




Search ID Equal CCW 






144-151 


90-97 




TIC CCW 


c 




152-159 


98-9F 




Verify CCW 




160-161 


A0-A1 




Track capacity 


1 « 


If CONTROL=YES 


162-164 


A2-A4 




Not used 




164-167 


A4-A7 




End-of-extent routine address (primarily 
used by COBOL compiler) 


8 




168-183 


A8-B7 




Control CCB 







184-191 


B8-BF 




Control CCW 





These bytes are always generated when spanned processing is specified 



DTFSD (Workfiles) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


^Filename 


0-15 


00-0F 




Commend Control Block (CCB) 




16 


10 


0-1 

2 

3 

4 

5-7 


Not used 

1= File assigned 'IGN' (COBOL) 
1= Track hold option specified 
1= DTF relocated by OPENR 
Not used 




17-19 


11-13 




Address of logic module 




20 


14 




DTF type for OPEN/CLOSE (X'20' = sequential 
access DASD files) 




21 


15 




1 

2 
3 
4 
5 
6 
7 


0= Disk device 

1= CLOSE macro is not to delete Format 1 and 

Format 3 file labels 

1= Work file 

Type of open : 1= Point; 0= Normal 

1= Routine entered from close routine 

1= File opened; 0= File closed 

Not used 

1= Re-entry to close routine 




22-28 


16-1C 




Filename (DTF name) 




29 


ID 




Device type Code : 

X'00'=2311 

X'0r=2314, 2319 

X*04 v = 3330-1 , 2 
JC'05'= 3330-11 
*' 07 '=3350 
X'08'= 3340 general 
X'09'= 3340 35MB 
X*OA'= 3340 70MB 

Note: In previous versions, last byte of filename 

~ contains device type code 




30-31 


1E-1F 




Track capacity counter 




32-35 


20-23 




Address of Format 1 label in VTOC (CCHR) 




36 


24 




Extent sequence number 




37 


25 



1 
2 
3 

4 
5 
6 

7 


Open communication byte 

Not used 

1= Device supports RPS 

Not used 

1= symbolic unit in DTF 

1= next extent on new volume 

1 = extent opened 

Not used 

1= DTF has been extended into the partition 

virtual area 




38 


26 




Lower head limit 




39 


27 




Upper head limit 


SFilename.L 


40-41 


28-29 




Record length 




42-45 


2A-2D 




Initial extent lower limit 




46-49 


2E-31 




Current extent lower limit 




50-53 


32-35 




Extent upper limit 



DTFSD (Workfiles) (. . . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


8f ilename.S 


54-55 


36-37 




Seek address (BB= X'OOOO') 




56-59 


38-3B 




Search address (CCHH) 




60 


3C 




Record number 




61 


3D 




1 
2 
3 
4 
5 
6 
7 


Switch byte used by logic module 

1= First write entry indicator 

1 = Write update indicator 

1= POINTS macro issued 

Not first record of a track (RECFORM= UNDEF) 

1 = Track upper limit reached 

Not used 

1= Check after read/write 

Not used 




62-63 


3E-3F 




Maximum record length 




64 


40 




Verify chain bit 




65-67 


41-43 




Address of user's EOF routine 




68 


44 



1 
2 
3 
4 
5 
6-7 


Logical indicators 

l=ERROPT= address 

1= ERROPT= IGNORE 

1= Fixed-length unblocked records 

1= Verify specified 

l=ERROPT=SKIP 

1= Re-read after read error 

Not used 




69-71 


45-47 




Address of user read/write error routine 




72-143 


48-8F 




CCW chain for work files 




144-151 


90-97 




Input area for Verify CCW and Read Count CCW 



DTF Assembly 
Label 


Module DSECT 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


&Filename 


IJICCB 


0-15 


00-OF 




Command Control Block (CCB) 




IJIMOD 


16 


10 



1 
2 
3 

4 
5 
6 

7 


1= Trailer labels 

Used by FREE macro 

1= COBOL Open/Ignore option 

1= Track hold option specified 

1= DTF relocated by OPENR 

Not used 

1= SPNUNB 

Used by CNTRL macro 






17-19 


11-13 




Address of logic module 






20 


14 




DTF type for OPEN/CLOSE 
(X'22'= direct access files) 




IJISWI 


21 


15 




1 
2 

3 

4 
5 

6 

7 


1= Output; 0= Input 

1= Verify option specified 

1= Search multiple track (SRCHM) 

specified 

1= WRITE AFTER or WRITE RZERO 

macro used 

1= IDLOC specified 

1= Undefined; 0=FIXUNB, 

VARUNB or SPNUNB 

1= RELTYPE= DEC 

1= End of file 




IJIFNM 


22-28 


16-IC 




Filename (DTF name) 




IJIDVTP 


29 


ID 




Device type code: X'05'=3330-ll 
X'00'=2311 X'07'=3350 
X'0r=2314,2319 X'08'=3340 general 
X'02'=2321 X'09'=3340 35MB 
X'04'=3330-l , -2 X'0A'=3340 70MB 




IJIUNT 


30-31 


1E-1F 




Starting logical unit address of 
the first volume containing the 
data file. This value is supplied 
by the OPEN from EXTENT cards 
(can be initially zero) 




IJIRPS 


32 


20 



1 

2-6 
7 


Not used 

1= Device supports RPS 

Not used 

1= DTF has been extended into 

the partition virtual area 




IJIULB 


33-35 


21-23 




Address of user's label routine 




IJIUXT 


36-39 


24-27 




Address of user's routine for pro- 
cessing EXTENT information 




IJIRELPT 


40 


28 




Pointer to relative address area 
AFilename.P - oTilename 

2 
Address of a 2-byte field in which 




IJIERC 


41-43 


29-2B 














IOCS can store the error conditi- 












on or status codes 




IJITST 


44-45 


2C-2D 




Macro code switch for internal use: 

X'OOOO^ READ ID 

X'OOOl' =READ KEY 

X'0002'= WRITE ID 

X'0003'= WRITE KEY 

X'0004'= WRITE RZERO 

X'0005'= WRITE AFTER 



DTFDA (....Cont'd) 



DTF Assembly 
Label 


Module DSECT 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




IJIBPT 


46-47 


2E-2F 




Pointer to channel program build 
area (&T ilename.B) minus 32 




IJICB2 


48-63 


30-3F 




Control seek CCB 


&Filename.Z 


IJICCW 


64-71 


40-47 




Control Seek CCW for overlap 
seek routine 




IJIXMD 


72-75 


48-4B 




Channel program builder instruc- 
tion: XI 36(2),C0' 




IJIMSZ 


76-77 


4C-4D 




Maximum data length for FIXUNB 
or UNDEF records; BLKSIZE for 
VARUNB or SPNUNB records 




IJISPT 


78 


4E 




Pointer to READ ID string (File 
name.O); X'00' if no READ ID 






79 


4F 




Pointer to READ KEY string (File 
name. 1); X'00' if no READ KEY 
issued 






80 


50 




Pointer to WRITE ID string (File 
name. 2); X'00' if no WRITE ID 
issued 






81 


51 




Pointer to WRITE KEY string (File 
name. 3); X'00' if no WRITE KEY 
issued 






82 


52 




Pointer to WRITE RZERO string 
(Filename. 4); X'00' if no WRITE 
RZERO issued 






83 


53 




Pointer to WRITE AFTER string 
(Filename. 5); X'00' if no WRITE 
AFTER issued 




IJITRK 


84-85 


54-55 




Track constant: 

2311: H'O' if key length=0 

H'20' if key length/0 

2314/2319: H'O' if key length=0 

H'45' if key length^O 

3330: H'135' if key length=0 

H'191' if key lenqth^O 

3340: H'167' if key lengrh=0 

H'242* if key length^) 

3350: H'185' if key length=0 

H'267' if key length/0 

2321 : H'O' if key length=0 

H'16' if key length?*) 




IJIRIC 


86-87 


56-57 




2311 : H'61' 
2314/2319: H' 101 ' 
3330 : H'135' 
3340 : H'167' 
3350: H'185' 
2321 : H'84' 




IJILAT 


88 


58 



1 
2 
3 
4 


Not used 

1= Wrong-length record 

1= non data transfer error 

Not used 

1= no room found 



DTFDA (....Cont'd) 



DTF Assembly 
Label 


Module DSECT 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 






88 
(Cont'd) 




5-6 

7 


Not used 

1= Record out of extent area 






89 


59 



1 

2 
3 

4 
5 
6 
7 


1= Data check in count area 

1= Track overrun 

1= End of cylinder 

1= Data check when reading key 

1= No record found 
1= End of file 
1= End of volume 
Not used 




IJILBTK 


90-95 


5A-5F 




Label track address, XBCCHH, 
where X is the volume sequence 
number of the device on which the 
label track is located. 


The following section is includ 


ed if UNDEF, AFTER 


or RZERO is specified 


oTilename.L 


IJILST 


96-143 


60-8F 




Basic CCW's to build channel pro- 




IJIVIT 
IJIFRU 


144-183 
184-185 

186-187 


90-B7 
B8-B9 

BA-BB 




gram 

Basic CCW's for undefined length 
or formatting macros 
Instruction to give record length 
to user if record length is undefined 
(NOPR if no RECSIZE specified ) 
Instruction to get record length 
from user if record length is unde- 
fined. (NOPR if no RECSIZE 
specified) 


&Filename.F 


IJIFLD 


188-192 


BC-C0 




Work area (used for R0 address - 
CCHH0) 


oTilename.K 


UICNT 


193-200 


C1-C8 




Work area (used for R0 data field) 


5f ilename.C 


IJICTS 


201-208 


C9-D0 




Work area (included only for span- 
ned or variable records for record 
count field) 


The channel program builder st 
the channel program building a 


ings are generated fc 
rea 


Mowing the DTFDA table and preceding 


AFilename.O 




Variable 




Channel program builder string for 
READ ID macro. If READ ID is not 
specified, the string is not gene- 
rated 


&Filename.l 




Variable 




Channel program builder string for 
READ KEY macro. If READ KEY is 
not specified, the string is not ge- 
nerated 


£Filename.2 




Variable 




Channel program builder string for 
WRITE ID macro. If WRITE ID is 
not specified , the string is not gene- 
rated 



PTF DA (....Cont'd) 



DTF Assembly 
Label 


Module DSECT 
Label 


Bytes 


Bits 


Function 


Dec | Hex 


if Mename.3 




Variable 




Channel program builderstring for 
WRITE KEY macro. If WRITE KEY 
is not specified, the string is not 
generated 


6f ilename.4 




Variable 




Channel program builder string for 
WRITE RZERO macro. If WRITE 
RZERO or WRITE AFTER is not speci- 
fied, the string is not generated 


ofilename.5 




Variable 




Channel program builder string for 
WRITE AFTER macro. If WRITE 
RZERO or WRITE AFTER is notspe- 
cified, the string is not generated 


The following section contains the channel program builc 


areas and varies in size 


Sfilename.B 




0-7 1 00-07 

Variable 

Variable 




Seek CCW that is generated at 
program assembly time and used 
by all channel programs 

Area to build: 

1) Eight CCW's if AFTER is not 
specified 

2) Eight CCW's if spanned or vari- 
able length records and AFTER= 
YES is specified 

3) Seven CCW's if undefined or 
fixed records and AFTER= YES 
is specified 

Area to build: 

1) Eight CCW's if AFTER is not 
specified and VERIFY= YES is 
specified 

2) Eight CCW's if spanned or vari- 
able length records and AFTER= 
YES and VERIFY= YES are spe- 
cified 

3) Five CCW's if undefined or fixec 
records and AFTER= YES and 
VERIFY=YES are specified 


The following section is added for spanned records only 






8 bytes 




Count save area 






8 bytes 




SEEKADR save area 






1 byte 



1 
2 
3 
4 
5-7 


1= Relative addressing 

1= UIGET switch on 

1= Ignore hold switch on 

1= Reserved for use by DAMODV 

1= New volume SEEKADR 

Not used 



DTFDA (....Cont'd) 



DTF Assembly 
Label 


Module DSECT 
Label 


Bytes 


Bits 






Dec | Hex 


' " """" ' 






1 byte 




Reserved 






2 bytes 




Record size 






12 bytes 




Work area 






8 bytes 




Control word save area 


The following section is added to the DTFDA table if DSKXTNT (relative addressing) is specified 


oTilename.P 




3 bytes 




3X'00' for padding 


SFilename.l 




5 bytes 




IDLOC record area (bucket used by 


SFilename.S 




8 bytes 

4 bytes 
4 bytes 
8 bytes 




SEEK ADR in the form: 
M,B1,B2,C1,C2,H1,H2,R 

DC A(&SEEKADR) 

DC A(&IDLOC) 

Work area for RELTYPE= DEC 


&Filename.X 




4 bytes 
4 bytes 




Save area for CCHH portion of 
actual DASD address 

Alteration factor for CI in SEEK 
ADR (see bytes 112-119) 
2311 : X'OOOOOOOl' 
2314/2319: X'OOOOOOOl' 
3330 : X'00001300' 
3340 : X'OOOOOCOO' 
3350 : X'OOOOIEOO' 
2321 : X'000003E8' 






4 bytes 




Alteration 

ADR (see b 

2311 

2314/2319 

3330 

3340 

3350 

2321 


Factor for C2 in SEEK 
ytes 112-119) 

X'OOOOOOOA' 

X'00000014' 

X'00000013' 

X'OOOOOOOC 

X'0000001 E' 

X'00000064' 






4 bytes 




Alteration 

ADR (see b 

2311 

2314/2319 

3330 

3340 

3350 

2321 


actor for HI in SEEK 
^fes 112-119) 

X'OOOOOOOl' 

X'OOOOOOOl' 

X'OOOOOOOl' 

X'OOOOOOOl' 

X'OOOOOOOl' 

X'00000014' 






Variable 
to end of 
DTF table 

Bytes 0-2 TTT2 - c 

3 M-v 

4 B -b 
5-7 TTT1 - r 

t 


umu 
XTN1 
hec 

elati 
lis e 


DSKXTNT table composed of a 
variable number of 8-byte entries 
containing extent information in 
the following format: 

ative number of tracks in the DSK 
table entries up to and including 

jrrent entry 

e sequence number 

mber (0 for disk devices) 

/e track number of lower limit of 

itry 






A 2-byte end-of-table indicator containing X'FFFF ' 
follows the last entry in the DSKXTNT table 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


&F ilename 


-15 


00-0F 




Command Control Block (CCB) 




16 


10 




1 
2 
3 

4 

5 
6 
7 


Used by ISAM Interface Program 

Not used 

1= COBOL open; ignore option 

Not used 

1= DTF table address constants relocated by 

OPENR 
Not used 

1= Data set security 
l = Wrong blocksize error during file extension 




17-19 


11-13 




Address of logic module 




20 


14 




File type for OPEN/CLOSE (X'24'= LOAD) 




21 


15 



1 
2 
3 
4 
5 
6 
7 


Option byte: 

1=2321 (Version 1-2 only) 

Not used 

1= Cylinder overflow option 

Not used 

1= Blocked records (used by previous versions) 

1= Verify 

1= Indexes on 2321 (Version 1-2 only) 

1=2 I/O areas present 




22-28 


16-1C 




File name 




29 


ID 




Prime data device type indicator: 
X'00'= 2311 ; X'01^ 2314/2319 ; 
X'02'= 2321 ; X'04'= 3330 ; 
X'08'= 3340 general; X'09'= 
3340 35MB; X'OA'^ 3340 70MB 


SFilename.C 


30 


IE 



1 
2 
3 

4 

5 
6 

7 


Status byte: 

1= Uncorrectable DASD error (except WLR) 

1=WLR error 

1= Prime data area full 

1= Cylinder index area not large enough to 
reference prime data area. Set on only if 
error detected at SETFL time 

1= Master index not large enough to reference 
prime data area. Set on only if error detec- 
ted at SETFL time 

1= Duplicate record 

1= Sequence error 

l=No EOF record written in prime data area 




31 


IF 




High level index device type indicator: 
X'00'= 231 1 ; X'01 '= 2314/2319 ; 
X'02'= 2321 ; X'04'= 3330 ; 
X'08'= 3340 general ; X'09'= 
3340 35MB ; X'0A'= 3340 70MB 




32 


20 




Relative position of the DSKXTN (logical unit, 
cell number) table (in words). This value is the 
length of the DTF table divided by 4 



DTFlS(Lood) (...Cont'd) 



DTF Assembly 
Label 


Byt 


es 


Bits 


Function 


Dec 


Hex 




33-34 


21-22 




First prime track in cylinder (HH) 




35 


23 




First prime data record in cylinder (R) 




36-37 


24-25 




Last prime track in cylinder (HH) 




38 


26 




High record on master index/cylinder index 
track (R) 




39 


27 




High record on prime data track (R) 




40 


28 




High record on overflow track (R) 




41 


29 




High record on last track index track in 
cylinder (whether shared or unshared) 




42 


2A 




High record on track index track other than last 
in cylinder. If only one track index track in 
cylinder, it is equal to byte 41 




43 


2B 



1 
2 
3 
4 

5 
6-7 


Condition code : 

1= WLR checks requested (for extension) 

1= First record in file 

1= Prime data extent full 

1= Master inde>v' c yl' nc ' er index extent too small 

1= Prime data upper limit has been increased 

(for extension) 

1= Extension 

Not used 




44-50 


2C-32 




Prime dota lower limit (MBBCCHH) 




51-57 


33-39 




Cylinder index lower limit (MBBCCHH) 




58-64 


3A-40 




Master index lower limit (MBBCCHH) 




65 


41 


0-3 

4 
5 
6 
7 


Number of index levels 

Not used 

1= RPS type device (data) 

1= RPS type DTF 

1= Master index 

1= RPS type device (index) 


Sf ilename.H 


66-73 


42-29 




Address of last prime data record (MBBCCHHR) 




74-75 


4A-4B 




Logical record length 




76-77 


4C-4D 




Key length 




78-79 


4E-4F 




Block length (logical record length times 
number of records) 




80-81 


50-51 




Overflow record length (logical record length 
plus 10) 




82-83 


52-53 




Blocking factor (number of logical records) 




84-85 


54-55 




Index entry length (key length plus 10) 




86-87 


56-57 




Prime data record length (key length plus 
physical record length) 




88-89 


58-59 




Overflow record length with key (key length 
plus logical record length plus 10) 




90-91 


5A-5B 




Prime data record format length (key length plus 
physical record length plus 8) 



DTFIS(Lood) (....Cont'd) 



DTF Assembly 
Label 


By 


tes 


Bits 


Function 


Dec 


Hex 




92-93 


5C-5D 




Overflow record format length (key length plus 
logical record length plus 18) 




94-95 


5E-5F 




Key location (in blocked records) 


This is the end 

able and is ger 


of the com 
erated ace 


mon DTF area. The format of the remainder of the table is vari- 
ording to the parameters specified in the DTF IS macro instruction 


fif ilename.S 


96-103 


60-67 




Seek/search address area (MBBCCHHR) 


of ilename.P 


104-105 


68-69 




Logical record counter (for blocking) 




106-107 


6A-6B 




Number of bytes for high level index 




108-111 


6C-6F 




Prime data record counter (logical records) 




112 


70 


0-1 

2 
3-5 

6 

7 


Status indicators: 

Not used 

1= File closed 

Not used 

1= Last prime data track full 

1= Last block full 




113-117 


71-75 




Last track index normal entry address (CCHHR) 




118-122 


76-7A 




Last cylinder index entry address (CCHHR) 




123-127 


7B-7F 




Last master index entry address (CCHHR) 


of ilename.B 








CCW build area. See description of SETFL 
macro, phase 1 - S$B SETFL 




128-135 


80-87 




Seek CCW 




136-143 


88-8F 




Search ID Equal CCW 




144-151 


90-97 




TIC CCW 




152-159 


98-9F 




Read/Write CCW 




160-167 


A0-A7 




Search ID Equal CCW 




168-175 


A8-AF 




TIC CCW 




176-183 


B0-B7 




Verify CCW 


of ilename.M 


184-187 


B8-BB 




Address of IOREAL 




188-191 


BC-BF 




Address of data in WORKL. (FIXBLK= address 
of WORKL; FIXUNB= address of WORKL plus 
key). 




192-195 


C0-C3 




Address of key in WORKL. (FIXBLK= address 
of WORKL plus KEYLOC minus 1; FIXUNB= 
address of WORKL.) 




196-199 


C4-C7 




Block position indicator (address of logical 
record in IOAREAL) 




200 


C8 


0-2 
3 
4-6 

7 


Master index, extension indicator: 

Not used 

1= Extending file; 0= Creating file 
Not used 

1= Master index being used; 0=No master index 
being used 



DTFIS(Lood) (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




201-204 


C9-CC 




Cylinder index upper limit (CCHH) 




205-208 


CD-DO 




Master index upper limit (CCHH) 




209-215 


D1-D7 




Prime data upper limit (old upper limit if exten- 
sion) (MBBCCHH) 




216-222 


D8-DE 




Prime data new upper limit (for extension) 
(MBBCCHH) 




223 


DF 




Last prime data track in cylinder minus 1 




224-225 


EO-EI 




Key length minus one 




226-227 


E2-E3 




Logical record length minus 1 




228-229 


E4-E5 




Address of track index dummy record (HR) 




230-231 


E6-E7 




Address of record before first prime data record 
in cylinder (HR) 




232 


E8 




Number of records on master index/cyl inder 
index track minus 1 




233-236 


E9-EC 




Master index/cyl inder index DASD address 

control field (CCHH): 

2311 = X'00C70009' 

2314/2319= X'00C70013' 

2321 =X'13090413' 

3330 = X'01FF0012' 

3340 =X , 01FF000B , (35MB),X , 02FF000B' 




237-239 


ED-EF 




Prime data address control field (CCH): ( 70MB ) 

2311 = X'00C700' 

2314/2319= X'00C700' 

2321 = X" 130904' 

3330 = X'OIFFOO' 

3340 = X'01 FF00' (35MB), X '02FF00 '(70MB) 

Prime data beginning of volume (CCH): 




240-242 


F0-F2 












2311 =X'000100' 










2314/2319= X'000I00' 










2321 =x'ooooor 










3330 = X'000100' 




243-245 


F3-F5 




3340 = X'000100' 

Prime data end of volume (CCH): 

2311 =X'00C700' 

2314/2319= X'00C700' 

2321 = X' 130504' 

3330 = X'019300' 

3340 = X'015B00'(35MB), X'02B700'(70MB) 




246-247 


F6-F7 




Used for alignment 




248-251 ' 


F8-FB 




First entry in DSKXTN table (logical unit, 
cell number) 




256-2S9 2 


100-103 




X'FFFFFFFF'= End of DSKXTN table 




260-263 


104-107 




Address of IOAREA2 




264-267 


108-10B 




Address used to relocate IOAREA2 



1) Each entry in the DSKXTN table is 4 bytes long. The minimum number of entries is 
two. There is one entry per extent. 

2) Location of the end-of-table indicator depends on length of DSKXTN table 



DTFIS (Add) - part 1 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


8f ilename 


-15 


00-0F 




CCB 




16 


10 



1 
2 
3 

4 

5 
6 
7 


Used by ISAM Interface Program 

Not used 

1= COBOL open; ignore option 

1 = Track hold specified 

1= DTF table address constants relocated by 

OPENR 
Not used 

1= Data set security 
1= Wrong blocksize error during addition to file 




17-19 


11-13 




Logic module address 




20 


14 




File type for OPEN/CLOSE (X'25'= ADD) 




21 


15 



1 

2 
3 
4 
5 
6-7 


Option byte: 

1=2321 (Version 1-2 only) 

1= Prime data in core 

1= Cylinder overflow 

1= Cylinder index in core 

1= Blocked records 

1= Verify 

Not used 




22-28 


16-1C 




DTF file name 




29 


ID 




Prime data device type indicator: 
X'00'=2311 X'01'= 2314/2319 
X'02'= 2321 X'04'= 3330 
X'08'= 3340 general 
X'09'= 3340 (35MB) X'0A'= 3340 (70MB) 


SF ilename.C 


30 


IE 



1 
2 
3 
4 
5 
6 
7 


Status byte: 

1= Uncorrectable DASD error (except WLR) 

1 = WLR error 

l=EOF (sequential) 

l=No record found 

1= Illegal ID specified 

1= Duplicate record sensed 

1= Overflow area full 

1= Record retrieved from overflow area 




31 


IF 




Highest level index device type: 
X'00'= 231 1 X'01 '= 231 4/2319 
X'02'=2321 X'04'=3330 
X'08'= 3340 general 
X'09'= 3340 (35MB) X'0A'= 3340 (70MB) 




32 


20 




Relative position of the DSKXTN (logical unit, 
cell number) table (in words). This value is the 
length of the DTF table divided by 4 




33-35 


21-23 




First prime data record in cylinder (HHR) 




36-37 


24-25 




Last prime data track in cylinder (HH) 




38 


26 




High record number on master index/cylinder 
index track (R) 



DTFIS (Add)- part 1 (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




39 


27 




High record number on prime data track (R) 




40 


28 




High record number on overflow track (R) 




41 


29 




High record number on shared track (R) 




42 


2A 




High record number on track index (Tl) track (R) 




43 


2B 




1 
2 
3 
4 
5 
6 
7 


Retrieval byte : 

l=WORKR area specified 

1= WORKS area specified 

Overflow switch 

l=Read 

Not used 

1= Output 

1= Write key 

1= PUT macro issued 




44-50 


2C-32 




Prime data lower limit (MBBCCHH) 




51-57 


33-39 




Cylinder index lower limit (MBBCCHH) 




58-64 


3A-40 




Master index lower limit (MBBCCHH) 




65 


41 




1 

2-3 

4 

5 

6 

7 


Index level number, WAITF indicator : 

1= From WAITF routine 

1= WAITF seek check bit 

Not used 

1= RPS type device (data) 

1= RPS type DTF 

1= Master index 

1= RPS type device (index) 




66-73 


42-49 




Last prime data record address (MBBCCHHR) 




74-75 


4A-4B 




Logical record length (RECSIZE) 




76-77 


4C-4D 




Key length (KEYLEN) 




78-79 


4E-4F 




Block size (logical record length times number 
of records) 




80-81 


50-51 




Overflow record length (logical record length 
plus 10) 




82-83 


52-53 




Blocking factor (number of logical records in 
block (NRECDS) 




84-85 


54-55 




Index entry length (key length plus 10) 




86-87 


56-57 




Prime data record length (key length plus 
physical record length (block size) 




88-89 


58-59 




Overflow record length plus key (key length 
plus logical record length plus 10) 




90-91 


5A-5B 




Prime data record format length (key length 
plus blocksize plus 8) 




92-93 


5C-5D 




Overflow record format length (key length 
plus logical record length plus 18) 




94-95 


5E-5F 




Key location (KEYLOC) for blocked records 




96-97 


60-61 




Constant = 5 




98-99 


62-63 




Constant = 10 



DTFIS (Add) - port 1 (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




100-101 


64-65 




Displacement of part 2 of the DTFIS table from 
start of part 1 




102-103 


66-67 




Displacement of part 3 of the DTFIS table from 
start of part 1 


fifilename.S 


104-113 


68-71 




Seek/search address area (MBBCCHHRFP) 


aFitename.W 


114-123 


72-7B 




Randorr(/sequential retrieval work area 


oFilename.P 


124-127 


7C-7F 




Prime data record count 




128 


80 


0-1 

2 
3-5 

6 

7 


Status indicators: 

Not used 

1= File closed 

Not used 

1= Last prime data track full 

1= Block complete 




129-133 


81-85 




Last track index normal entry address (CCHHR) 




134-138 


86-8A 




Last cylinder index entry address (CCHHR) 




139-143 


8B-8F 




Last master index entry address (CCHHR) 




144-151 


90-97 




Last independent overflow record address 
(MBBCCHHR) 


SFilename.l 


152-153 


98-99 




Number of independent overflow tracks 


&Filename.A 


154-155 


9A-93 




Number of full cylinder overflow areas 


SFilename.O 


156-157 


9C-9D 




Overflow record count 




158-164 


9E-A4 




Independent overflow area lower limit 
(MBBCCHH) 




165-171 


A5-AB 




Independent overflow area upper limit 
(MBBCCHH) 




172-175 


AC-AF 




A(oFilename.D) - Address of work area for 
cylinder overflow control record (COCR) 




176-179 


B0-B3 




AfSFilename.D-tS) - Address of workarea for 
the current track index normal entry count field 




180-183 


B4-B7 




A(SF ilename.D+16) - Address of work area for 
current track index overflow entry count field 




184-187 


B8-BB 




A(8filename.D+24) - Address of workarea for 
current prime data record count field 




188-191 


BC-BF 




A( ©Filename. D+32) - Address of work area for 
current overflow record count field 




192-195 


C0-C3 




A(8f ilename.D+40) - Address of work area for 
track index normal entry data field 




196-199 


C4-C7 




AfSfilename.D+SO) - Address of work area for 
current overflow record linkage field 




200-203 


C8-CB 




A(&IOREAL) - Address of IOREAL, the I/O 
area used for adding records to a file 



DTFIS (Add) - part 1 (. . . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




204-207 

208-211 
212-215 

216-219 


CC-CF 

D0-D3 
D4-D7 

D8-DB 




A(&WORKL) - Address of WORKL, workarea 
containing user data records to be added to the 
file 

A(&Filename.K) - Address of the ADD key area 

A(&IOAREAL4S) - Address of key position in 
IOAREAL 

A(&IOAREAL+B+&KEYLEN) - Address of data 
position in IOAREAL 



DTFIS (Add) - part 2 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


ofilename.2 


-3 

4 

5 -7 


00-03 
04 

05-07 




1-5 
6 

7 


A(&F ilename.S+3) - Address of the seek/search 
address area plus 3 

1= Seek check indicated 
Not used 

1= Over/under seek has occurred 
1= An error has been found, but a seek check 
is indicated 

A(SF ilename.W) - Address of random/sequential 
retrieval work area 


The following information is generated if the cylinder index in core option is specified 




12-15 

16-17 

18-25 

26-30 
31 

32-35 


0C-OF 
10-11 
12-19 

IB-IE 

IF 

ID -23 



1 
2 
3 

4-7 


A(&INDAREA) -Starting address of main storage 
area specified for cylinder index 

AL2(&INDSIZE) - Number of bytes in main 
storage available for cylinder index 

Next cylinder index entry to be read 
(MBBCCHHR) 

Last cylinder index entry (CCHHR) 

Core index byte: 

1= First time through B-transient, SSBINDEX 

1= End of cylinder index reached 

1= Index skip option specified 

1= Suppress in-core option and read cylinder 

Not used 

Pointer to key (stored by module) 



DTFIS (Add) - pal, . 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec | Hex 


The following information is generated if the prime data in core add function is specified 
This information is aligned on a double word boundary 


IJHDCWRK 


36-37 
38-39 

40-43 
44-47 
48 

49 
50-51 


24-25 
26-27 

28-2B 
2C-2F 
30 

31 
32-33 



1-7 


Size of IOAREAL 

Maximum number of prime data records in main 

Address of write CCW's 
Address of read CCW's 
Switch byte: 
l=EOF 
Not used 

Reserved. 

Work field for I/O Module. 



DTFIS (Add) -part 3 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


filename. B 


-7 


00-07 




CCW X'07', &F ilename.S+1, X'40', 6 - Long 
seek CCW with command chaining 




8 -127 


08-7F 




Channel program build area. 


&Filename.D 


128-135 


80-87 




Cylinder overflow control record (COCR) 




136-143 


88-8F 




Current track index normal entry count field 
address 




144-151 


90-97 




Current track index overflow entry count field 
address 




152-159 


98-9F 




Current prime data record count field address 




160-167 


A0-A7 




Current overflow record count field address 




168-177 


A8-B1 




Track index normal entry data field 




178-187 


B2-BB 




Current overflow record sequence link field 




188-197 


BC-B5 




Current track index overflow entry data field 




198 


C6 




X'OT -Add to EOF 

X'02 1 - Add to independent overflow area 




199-201 


C7-C9 




Overflow control bytes (CCH) 




202-203 


CA-CB 




High HR on overflow track 




204-211 


CC-D3 




Volume upper limit for prime data records 
(MBBCCHHR) 




212-217 


D4-D9 




CLC (&KEYLEN, 13), (6) - Unblocked 
CLC (&KEYLEN, 13), &KEYLOC-1 (6) - 
Blocked Ut! lity CLC for key 



DTF IS (Add) - part 3 ( . . . . Cont 'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


6Filename.E 
(Sfilename.K 


218-223 

224-227 1 

232-235 2 
236 + 


DA-DF 

E0-E3 

E8-EB 
EC-end 




MVC (&KEYLEN, 13),0 (12) - Unblocked 
MVC0(&KEYLEN,13),&KEYLEN-1 (12)- 
Blocked Utility MVC for key 

First entry in DSKXTN table (logical unit, 
cell number) 

4X'FF' - End of DSKXTN table 

Key area for ADD only. Number of bytes de- 
pends on key length, KEYLEN 



1) Each entry in the DSKXTN table is four bytes long. The minimum number of entries is 
two. There is one entry per extent. 

2) Location of the end-of-table indicator depends on length of DSKXTN table. 



DTFIS (RETRVE, RANDOM) - port 1 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


&FMename 


-15 


00-OF 




Command Control Block (CCB) 




16 


10 



1 
2 
3 
4 

5-6 

7 


Used by ISAM Interface Program 

1= GET issued 

1= COBOL open; ignore option 

1= HOLD option specified 

1= DTF table address constants relocated by 

OPENR 
Not used 

1 = Different blocksize in format 




17-19 


11-13 




Address of logic module 




20 


14 




File type for OPEN/CLOSE (X'26'= RETRVE) 




21 


15 



1 
2 
3 
4 
5 
6-7 


Option byte: 

1 = 2321 (Version 1-2 only) 

1 = Prime data in core 

1= Cylinder overflow option 

1= Cylinder index in core option 

1 = Blocked records 

1= Verify 

Not used 




22-28 


16-1C 




File name (DTF name) 




29 


ID 




Prime data device type: 

X'00'=2311 X'01'= 2314/2319 

X'02'= 2321 X'04'= 3330 

X'08'= 3340 general 

X'09'= 3340 (35MB) X'0A'= 3340 (70MB) 


filename. C 


30 


IE 



1 
2 
3 
4 
5 
6 
7 


Status byte: 

1= Uncorrectable DASD error (except WLR error) 

1 = WLR error 

1= EOF (sequential) 

1= No record found 

1= Illegal ID specified 

1= Duplicate record sensed 

1= Overflow area full 

1= Record retrieved from overflow area 




31 


IF 




High level index device type: 
X'00'=2311 X'01'= 2314/2319 
X'02'= 2321 X'04^ 3330 
X'08'= 3340 general 
X'09'= 3340 (35MB) X'0A'= 3340 (70MB) 




32 


20 




Relative position of the DSKXTN (logical unit, 
cell number) table (in words). This value is the 
length of the DTF table divided by 4 




33-35 


21-23 




First prime data record in cylinder (HHR) 




36-37 


24-25 




Last prime data track in cylinder (HH) 




38 


26 




High record number on master index/cylinder 
index track (R) 




39 


27 




High record number on prime data track (R) 



DTFIS (RETRVE, RANDOM) - part 1 (. . . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




40 


28 




High record number on overflow track (R) 




41 


29 




High record number on shared track (R) 




42 


2A 




High record number on track index track (R) 




43 


2B 



1 
2 
3 

4 
5 
6 

7 


Retrieval byte : 

1= WORKR specified 

1= WORKS specified 

Overflow switch 

l=Read key 

Not used 

1= Output 

1- Write key 

1 = PUT macro issued 




44-50 


2C-32 




Prime data lower limit (MBBCCHH) 




51-57 


33-39 




Cylinder index lower limit (MBBCCHH) 




58-64 


3A-40 




Master index lower limit (MBBCCHH) 




65 


41 



1 
2 
3 
4 
5 
6 
7 


Index level number, WAITF, and track hold 

indicators : 

1= From WAITF routine 

1= Seek check from WAITF 

1= Index track held 

1= Data track held 

1= RPS type device (data) 

l=RPStype DTF 

1= Master index 

1= RPS type device (index) 




66-73 


42-49 




Last prime data record address (MBBCCHHR) 




74-75 


4A-4B 




Logical record length 




76-77 


4C-4D 




Key length 




78-79 


4E-4F 




Block size (logical record length times number 
of records) 




80-81 


50-51 




Overflow record length (logical record length 
plus 10) 




82-83 


52-53 




Blocking factor 




84-85 


54-55 




Index entry length (key length plus 10) 




86-87 


56-57 




Prime dota record length key (key length plus 
physical record length) 




88-89 


58-59 




Overflow record length with key (key length 
plus logical record length plus 10) 




90-91 


5A-53 




Prime data record format length key (key length 
plus physical record length plus 8) 




92-93 


5C-5D 




Overflow record format length key (key length 
plus logical record length plus 18) 




94-95 


5E-5F 




Key location (blocked records) 



DTFIS (RETRVE, RANDOM) - port 1 (. . . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




96-97 


60-61 




Consfant= 5 




98-99 


62-63 




Constant= 10 




100-101 


64-65 




Displacement of part 2 of the DTFIS table from 
part 1 




102-103 


66-67 




Displacement of part 3 of the DTFIS table from 
part 1 


oTMIename.S 


104-113 


68-71 




Seek/search address area (MBBCCHHRFP) 


oTilename.W 


114-123 


72-7B 




Random/sequential retrieval work area 



DTFIS (RETRVE, RANDOM) - part 2 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


SFilename.2 


-3 

4 


00-03 
04 




1-5 

6 

7 


Address of seek/search address area plus 3 
1= Seek check indicated 
Not used 

1= Over/under seek has occurred 
1= An error has been found, but a seek check 
is indicated 




5 -7 


05-07 




Address of random/sequential retrieval work area 




8 -11 


08-OB 




Address of IOAREAS 




12-15 


0C-0F 




Address of IOAREAR 




16-19 


10-13 




Address of KEYARG 




20-23 


14-17 




Address of WORKR 




24-27 


18-1B 




Current sequential I/O area address 




28-31 
32 


1C-1F 
20 




4-byte NO-OP instruction, or 
L IOREG, * - 4 if IOREG specified. 
X'00'= No verify; X'40'= Verify 




33 


21 




X'08'= Unblocked; X'00'= Blocked 




34 


22 




R= F irst prime data record on shared track 




35-39 


23-27 




Upper limit for sequential retrieval (CCHHR) 




40-41 


28-29 




H'0'= Blocked records 
H'2'= Overflow record 
H'8'= Unblocked records 




42 


2A 




X'C7'= 2311, 2314 or 2319; X'09'= 2321; 
XTF'=3330, 3340 




43-47 


2B-2F 




Initial values for sequential retrieval 


oTilename.H 


48-55 


30-37 




Current DASD address for sequential (MBBCCHHR) 




56-63 


38-3F 




Current overflow DASD address for sequential 
(MBBCCHHR) 



DTF1S (RETRVE, RANDOM) - port 2 (. . . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




64-65 


40-41 




Sequential record counter 




66-67 


42-43 




Current track index entry for sequential (HR) 


8F ilename.T 


68-69 


44-45 




Number of records tagged for deletion 




70-71 


46-47 




Load IOREG for random retrieval 


ofilename.G 


72-79 


48-4F 




DASD address save area (MBBCCHHR) 




80-83 


50-53 




Record pointer within I/O area for write operation 


afilename.R 


84-87 


54-57 




Nonfirst overflow record count 


The following 


information 


is generated when the cylinder index in core option is specified 




92-95 


5C-5F 




A(&INDAREA) - Starting address of main storage 
area specified for cylinder index 




96-97 


60-61 




AL2(&INDSIZE) - Number of bytes in main sto- 
rage available for cylinder index 




98-105 


62-69 




Next cylinder index entry to be read (MBBCCHHR) 
(Initialized by $$BINDEX to cylinder index 
starting address) 




106-110 


6A-6E 




Last cylinder index entry 




111 


6F 



1 
2 
3-7 


Core index byte: 

1 = First time through transient 

1= End of index reached 

1= Index skip option 

Not used 




112-115 


70-73 




Pointer to key (stored by the module) 




116-131 


74-83 




Reserved 



DTF IS (RETRVE, RANDOM) - part 3 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


6f ilename.B 


-7 

8 -63 
64-67 1 ) 

72-75 2 ) 


00-07 

08-3F 
40-43 

48-4B 




X'07',«f ilename.S+l,X'40',6 - Long seek CCW 
with command chaining 

Area to build CCW-string 

First entry in DSKXTN table (logical unit, cell 
number) 

4X'FF' End of DSKXTN table 



1) The length of one entry is the four bytes shown here. The minimum number of entries is 2. 
There is one entry per extent . 

2) The location of the end-of-table indicator depends on the length of DSKXTN table. 



DTFIS (RETRVE,SEQNTL) - port 1 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


oFilename 


-15 


00-0F 




Command Control Block (CCB) 




16 


10 



1 
2 
3 

4 

5 
6 

7 


Used by ISAM Interface Program 

1= GET issued 

1= COBOL open; ignore option 

1= Track Hold specified 

1= DTF table address constants relocated by 

OPENR 
1= EOF on sequential retrieve 
1= Data set security 
1= Different blocksize in format 1 label than in 

DTFIS 




17-19 


11-13 




Address of logic module 




20 


14 




File type for OPEN/CLOSE (X'26'= RETRVE) 




21 


15 



1 
2 
3 
4 
5 
6 
7 


Option byte: 

1=2321 (Version 1-2 only) 

1 = Prime data in core 

1= Cylinder overflow option 

1= Cylinder index in core option 

1 = Blocked records 

I = Verify 

1= IOAREAS just used; 0= IOAREA2 Just used 

1=2 I/O areas present 




22-28 


16-1C 




File name (DTF name) 




29 


ID 




Prime data device type: 

X'00^2311 X'01'= 2314/2319 

X'02'= 2321 X'04'= 3330 

X'08'= 3340 general 

X'09'= 3340 (35MB) X'0A'= 3340 (70MB) 


&F ilename.C 


30 


IE 




1 
2 
3 

4 
5 
6 

7 


Status byte: 

1= Uncorrectable DASD error (except WLR error) 

1 = WLR error 

1= EOF (sequential) 

l=No record found 

1= Illegal ID specified 

1= Duplicate record sensed 

1= Overflow area full 

1= Record retrieved from overflow area 




31 


IF 




High level index device type: 
X'00'=2311 X'0r= 2314/5319 
X'02'=2321 X'04'=3330 
X'08*= 3340 general 
X'09'= 3340 (35MB) X*0A'= 3340 (70MB) 




32 


• 20 




Relative position of the DSKXTN (logical unit, 
cell number) table (in words). This value is the 
length of the DTF table divided by 4) 




33-35 


21-23 




First prime data record in cylinder (HHR) 




36-37 


24-25 




Last prime data track in cylinder (HH) 



DTFIS (RETRVE, SEQNTL) - part 1 (.. .Cont'd) 



DTF Assembly 


Bytes 


Bits 


Function 


Label 


Dec 


Hex 








38 


26 




High record number on master index/cylinder 
index track (R) 




39 


27 




High record number on prime data track (R) 




40 


28 




High record number on overflow track (R) 




41 


29 




High record number on shared track (R) 




42 


2A 




High record number on track index track (R) 




43 


2B 



1 
2 
3 
4 

5 
6 

7 


Retrieval byte : 

l=WORKR specified 

1= WORKS specified " 

Overflow switch 

l=Read key 

1= First record being processed (after issuing 

SETL macro) 
1= Output 
1= Write key 
1= PUT macro issued 




44-50 


2C-32 




Prime data lower limit (MBBCCHH) 




51-57 


33-39 




Cylinder index lower limit (MBBCCHH) 




58-6 


3A-40 




Master index lower limit (MBBCCHH) 




65 


41 




1 

2-3 

4 

5 

6 

7 


Index level number, WAITF indicator : 

1= From WAITF routine 

1= WAITF seek check bit 

Not used 

1= RPS type device (data) 

1= RPS type DTF 

1= Master index 

1= RPS type device (index) 




66-73 


42-49 




Last prime data record address (MBBCCHHR) 




74-75 


4A-4B 




Logical record length 




76-77 


4C-4D 




Key length 




78-79 


4E-4F 




Block size (logical record length times number 
of records) 




80-81 


50-51 




Overflow record length (logical record length 
plus 10) 




82-83 


52-53 




Blocking factor 




84-85 


54-55 




Index entry length (key length plus 10) 




86-87 


56-57 




Prime data record length (key length plus 
physical record length 




88-89 


58-59 




Overflow record length with key (key length 
plus logical record length plus 10) 




90-91 


5A-53 




Prime data record format length (key length 
plus physical record length plus 8) 




92-93 


5C-5D 




Overflow record format length (key length plus 
logical record length plus 18) 




94-95 


5E-5F 




Key location (blocked records) 



DTFIS (RETRVE,SEQNTL) - part 1 (....Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




96-97 


60-61 




Constant= 5 




98-99 


62-63 




Constant= 10 




100-101 


64-65 




Displacement of part 2 of the DTFIS table from 
part 1 




102-103 


66-67 




Displacement of part 3 of the DTFIS table from 


&F?lename. S 


104-113 


68-71 




Seek/search address area (MBBCCHHRFP) 


&Filename.W 


114-123 


72-7B 




Random/sequential retrieval work area 



DTFIS (RETRVE,SEQNTL) - part 2 



DTF Assembly 
Label 


By 


tes 


Bits 


Function 


Dec 


Hex 


oTilename.2 


-3 


00-03 




Address of seek/search address area plus 3 




4 


04 




1-5 

6 

7 


1= Seek check indicated 
Not used 

1= Over/under seek has occurred 
1= An error has been found, but a seek check 
is indicated 




5 -7 


05-07 




Address of random/sequential retrieval work area 




8 -11 


08-0B 




Address of IOAREAS 




12-15 


0C-0F 




Address of IOAREA2 




16-19 


10-13 




Address of KEYARG 




20-23 


14-17 




Address of WORKR 




24-27 


18-1B 




Current sequential I/O area address 




28-31 
32 


1C-1F 
20 




L IOREG,*-4- Load IOREG 
or a 4 byte NO-OP instruction 
X'00' = No verify; X'40'= Verify 




33 


21 




X'08'= Unblocked records; X'00'= Blocked rec'ds 




34 


22 




R= First prime data record on shared track 




35-39 


23-27 




Upper limit for sequential retrieval (CCHHR) 




40-41 


28-29 




H'0'= Blocked records 
H'2'= Overflow record 
H'8'= Unblocked records 




42 


2A 




X'C7'= 231 1,2314 or 2319; X'09"= 2321; 
X'FF'=3330, 3340 




43-47 


2B-2F 




Initial values for sequential (CCHHR) 


©filename. H 


48-55 


30-37 




Current DASD address for sequential retrieval 
(MBBCCHHR) 




56-63 


38-3F 




Current overflow DASD address (MBBCCHHR) 



DTFIS (RETRV 


E,SEQNTL) 


- part 2 


(•• 


.Cont'd) 




DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




64-65 


40-41 




Sequential record counter 




66-67 


42-43 




Current track index entry (HR) 


&Filename.T 


68-69 


44-45 




Number of records tagged for 
deletion. 




70-75 


46-4B 




For boundary alignment. 




76-91 


4C-5E 




Reserved. 



DTFIS (RETRVE,SEQNTL) - part 3 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


SFilename.B 


-7 


00-07 




X'07', ©Filename. S+l, X'40',6 - Long seek 
CCW with command chaining 




8-63 


08-3F 




Area to build CCW-string 


SFilename.E 


64-67 1 ) 


40-43 




First entry in DSKXTN table (logical unit, cell 
number) 




72-75 2 > 


48-4B 




4XTF' - End of DSKXTN table 



1) The length of one entry is the four bytes shown here. The minimum number of entries is 2. 
There is one entry per extent . 



2) The location of the end-of-table indicator 
DTFIS (ADDRTR) - part 1 



on the length of DSKXTN table. 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


filename 


-15 


00-0F 




Command Control Block (CCB) 




16 


10 



1 
2 
3 
4 

5 
6 

7 


Used by ISAM Interface Program 

1= GET issued 

COBOL open; ignore option 

1 = Track hold option specified 

1= DTF table address constants relocated by 

OPENR 
EOF switch 
1= Data set security 
1 = Wrong blocksize error during addition tofile 




17-19 


11-13 




Logic module address 




20 


14 




File type for OPEN/CLOSE (X'27'= ADDRTR) 




21 


15 



1 
2 
3 
4 


Option byte: 

1 = 2321 (Version 1-2 only) 
1 = Prime data in core 
1= Cylinder overflow 
1= Cylinder index in core 
1= Blocked records 



DTFIS (ADDRTR) - port 1 (. . . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




21 
(Cont'd) 




5 
6 

7 


1= Verify 

1= lOAREAS just used; 0= IOAREA2 just used 

1=2 I/O areas present 




22-28 


16-1C 




DTF file name 




29 


ID 




Prime data device type indicator: 
X'00'=2311 X'0r= 2314/231? 
X'02'= 2321 X'04'= 3330 
X'08'= 3340 general 
X'09'= 3340 (35MB) X'0A'= 3340 (70MB) 


&filename.C 


30 


IE 



1 
2 
3 
4 
5 
6 
7 


Status byte: 

1= Uncorrectable DASD error (except WLR error) 

1=WLR error 

1= EOF (sequential) 

1= No record found 

1= Illegal ID specified 

1= Duplicate record sensed 

1= Overflow area full 

1= Record retrieved from overflow area 




31 


IF 




Highest level index device type: 
X'00'=2311 X'01'= 2314/2319 
X'02'=2321 X'04'=3330 
X'08'= 3340 general 
X'09'= 3340 (35MB) X'0A'= 3340 (70MB) 




32 


20 




Relative position of the DSKXTN (logical unit, 
cell number) table (in words). This value is the 
length of the DTF table divided by 4. 




33-35 


21-23 




First prime data record in cylinder (HHR) 




36-37 


24-25 




Last prime data track in cylinder (HH) 




38 


26 




High record number on master index/cyl'nder 
index track (R) 




39 


27 




High record number on prime data track (R) 




40 


28 




High record number on overflow track (R) 




41 


29 




High record number on shared track (R) 




42 


2A 




High record number on track index (Tl) track (R) 




43 


28 



1 
2 
3 
4 

5 
6 
7 


Retrieval byte: 

l=WORKR area specified 

1= WORKS area specified 

Overflow switch 

1= Read 

1= First record being processed (after issuing 

SETL macro) 
1= Output 
1 = Write key 
1= PUT macro issued 




44-50 


2C-32 




Prime data lower limit (MBBCCHH) 



DTFIS (ADDRTR) - port 1 (. . . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




51-57 


33-39 




Cylinder index lower limit (MBBCCHH) 




58-64 


3A-40 




Master index lower limit (MBBCCHH) 




65 


41 



1 
2 
3 
4 
5 
6 
7 


Index level number, WAITF and track 

hold indicators : 

l=From WAITF routine 

1= Seek check from WAITF 

1= Index track held 

1= Data track held 

1= RPS type device (data) 

1=RPS type DTF 

1= Master index; 0= cylinder index 

1=RPS type device (index) 


&Filename.H 


66-73 


42-49 




Last prime data record address (MBBCCHHR) 




74-75 


4A-4B 




Logical record length (RECSIZE) 




76-77 


4C-4D 




Key length (KEYLEN) 




78-79 


4E-4F 




Block size (logical record length times number 
of records) 




80-81 


50-51 




Overflow record length (logical record length 
plus 10) 




82-83 


52-53 




Blocking factor (number of logical records in 
block (NRECDS)) 




84-85 


54-55 




Index entry length (key length plus 10) 




86-87 


56-57 




Prime data record length (key length plus phy- 
sical record length (block size) 




88-89 


58-59 




Overflow record length with key (key length 
plus logical record length plus 10) 




90-91 


5A-5B 




Prime data record format length (key length plus 
block size plus 8) 




92-93 


5C-5D 




Overflow record format length (key length plus 
logical record length plus 18) 




94-95 


5E-5F 




Key location (KEYLOC) for blocked records 




96-97 


60-61 




Constant = 5 




98-99 


62-63 




Constant = 10 




100-101 


64-65 




Displacement of part 2 of the DTFIS table from 
start of part 1 




102-103 


66-67 




Displacement of part 3 of the DTFIS table from 
start of part 1 


Sfilename.S 


104-113 


68-71 




Seek/search address area 


Sfilename.W 


114-123 


72-7B 




Random/sequential retrieval work area 


&Filename.P 


124-127 


7C-7F 




Prime data record count 




128 


80 


0-1 
2 

3-5 
6 

7 


Status indicators : 

Not used 

1= File closed 

Not used 

1= Lasf prime data track full 

1= Block complete 



DTFIS (ADDRTR) - port 1 (. . . .Cont'd) 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 




129-133 


81-85 




Last track index normal entry address (CCHHR) 




134-133 


86-8A 




Last cylinder index entry address (CCHHR) 




139-143 


8B-8F 




Last master index entry address (CCHHR) 




144-151 


90-97 




Last independent overflow record address 

(MBBCCHHR) 


oF ilename.l 


152-153 


98-99 




Number of independent overflow tracks 


of ilename.A 


154-155 


9A-9B 




Number of full cylinder overflow areas 


oFilename.O 


156-157 


9C-9D 




Overflow record count 




158-164 


9E-A4 




Independent overflow area lower limit (MB3CCHH) 




165-171 


A5-AB 




Independent overflow area upper limit (MBBCCHH) 




172-175 


AC-AF 




A(oJFilename.D)- Address of work area for cy- 
linder overflow control record (COCR) 




176-179 


B0-B3 




A(oFilename.D+8) - Address of work area for 
the current track index normal entry count field 




180-183 


B4-B7 




A(&Filename.D+16) - Address of work area for 
current track index overflow entry count field 




184-187 


B8-BB 




A(3F ilename.D+24) - Address of work area for 
current prime data record count field 




188-191 


BC-BF 




A(oFilename.D+32) - Address of work area for 
current overflow record count field 




192-195 


C0-C3 




A(&f ilename.D+40) - Address of work area for 
track index normal entry data field 




196-199 


C4-C7 




A(ofilename.D+50) - Address of work area for 
current overflow record sequence-link field 




200-203 


C8-CB 




A(&IOAREAL) - Address of IOAREAL, the I/O 
area used for adding records to a file 




204-207 


CC-CF 




A(&WORKL) - Address of WORKL, work area 
containing user data records to be added to a file 




208-211 


D0-D3 




A(ofilename.K) - Address of the ADD key area 




212-215 


D4-D7 




A(&IOAREAL+S) - Address of key position in 
IOAREAL 




216-219 


D8-DB 




A(&IOAREAL+8+&KEYLEN) - Address of data 
position in IOAREAL 



DTFIS (ADDRTR) - part 2 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


Sf ilename.2 


-3 


00-03 




A(8Filename.S+3) - Address of the seek/search 
address area plus 3 




4 


04 




1-5 

6 

7 


1= Seek check indicated 
Not used 

1= Over/under seek has occurred 
1= An error has been found, but a seek check is 
indicated 




5 -7 


05-07 




A(SFilename.W) - Address of the random/sequen- 
tial retrieval work area 




8 -11 


08-0B 




Address of IOAREAS, I/O area used for sequen- 
tial retrieval 




12-15 


0C-0F 




Address of IOAREAR, I/O area used for random 
retrieval or address of IOAREA2 (if specified) for 
sequential retrieval 




16-19 


10-13 




Address of KEYARG, field containing user supplied 
key used for random READ/WRITE operations and 
sequential retrieval initiated by key 




20-23 


14-17 




Address of WORKR, work area used for random 
retrieval 




24-27 


18-IB 




Current sequential I/O area address 




28-31 


1C-1F 




1) L IOREG,*-4 - Load I/O register for sequen- 
tial or 

2) 4- byte NO-OP instruction for random 




32 


20 




X'00'= No verify; X'40'= Verify 




33 


21 




X'00'= Blocked; X'08'= Unblocked 




34 


22 




R= First prime data record on shared track 




35-39 


23-27 




Limits for sequential (CCHHR) 




40-41 


28-29 




H'0'= Blocked records 
H'2*= Overflow records 
H'8'= Unblocked records 




42 


2A 




X'C7'= 231 1,2314 or 2319; X'09'=2321; 
X'FF'=3330, 3340 




43-47 


2B-2F 




Initial values for sequential 


8F ilename.H 


48-55 


30-37 




Current sequential DASD address (MBBCCHHR) 




56-63 


38-3F 




Current overflow DASD address (MBBCCHHR) 




64-65 


40-41 




Sequential record count 




66-67 


42-43 




Current track index entry for sequential (HR) 


8F ilename.T 


68-69 


44-45 




Number of records tagged for deletion 




70-71 


46-47 




LR 6MOREG,0 for random (or 2-byte NO-OP 
for sequential) 


&Filename.G 


72-79 


48-4F 




DASD address save area for random retrieval 
(MBBCCHHR) 



DTF IS (AD DRTR) - part 2 ( . . . . Cont 'd) 



DTF Assembly 
Label 


By 

Dec 


■tes 
Hex 


Bits 


Function 




80-83 


50-53 




Record pointer within I/O area for write (for 
random retrieval) 


Sfilename.R 


84-87 


54-57 




Non-first overflow record count 


The following information is generated if the cylinder index in core option is specified. 
Bytes 88-91 (58-5B) are not used. 




92-95 


5C-5F 




A(&INDAREA) - Starting address of main storage 
area specified for cylinder index 




96-97 


60-61 




AL2(&INDSIZE) - Number of bytes in main sto- 
rage avialable for cylinder index 




98-105 


62-69 




Next cylinder index entry to be read 
(MBBCCHHR) 




106-110 


6A-6E 




Last cylinder index entry (CCHHR) 




111 


6F 



1 
2 
3 

4-7 


Core index byte: 

1= First time through B-transient, SSBINDEX 

1= End of cylinder index reached 

1= Index skip option specified 

1= Suppress index in-core option and read 

cylinder index 
Not used 




112-115 


70-73 




Pointer to key (stored by module) 


The following information 
This information is aligne 
prime data in core add fu 
(116-131) (74-83). 


is genera 
d on a dou 
nctions arc 


ed if the prime data in core add function is specified, 
ble word boundary. If both cylinder index in core and 
specified, the following information is found in bytes 




116-117 


74-75 




Size of IOAREAL 




118-119 


76-77 




Maximum number of prime data records in main 
storage 




120-123 


78-7B 




Address of write CCW's 




124-127 


7C-7F 




Address of read CCW's 




128 


80 



1-7 


Switch byte: 
l=EOF 
Not used 


IJHDCWRK 


129 
130-131 


81 
82-83 




Reserved. 

Work field for I/O module. 



DTFIS (ADDRTR) - part 3 



DTF Assembly 
Label 


Bytes 


Bits 


Function 


Dec 


Hex 


8F ilename.B 


-7 


00-07 




X'07', oFilename.S+1, X'40', 6 - Long seek 
CCW with command chaining 




8 -63 


08-3F 




Channel program build area 




64-127 


40-7F 




Channel progr. build area for add function only 


8f ilename.D 


128-135 


80-87 




Cylinder overflow control record (COCR) 




136-143 


88-8F 




Current track index normal entry count field 




144-151 


90-97 




Current track index overflow entry count field 




152-159 


98-9F 




Current prime data record count field 




160-167 


A0-A7 




Current overflow record count field 




168-177 


A8-B1 




Track index normal entry data field 




178-187 


B2-BB 




Current overflow record sequence-link field 




188-197 


BC-C5 




Current track index overflow entry data field 




198 


C6 




X'OT - Add to EOF 

X'02' - Add to independent overflow area 




199-201 


C7-C9 




Overflow control bytes (CCH) 




202-203 


CA-CB 




High HR on overflow track 




204-211 


CC-D3 




Volume upper limit for prime data records 
(MBBCCHHR) 




212-217 


D4-D9 




CLC 0(&KEYLEN,13),0(6) - Unblocked 

CLC 0(&KEYLEN, I3),&KEYLOC-l(6) - Blocked 

Utility CLC for key 




218-223 


DA-DF 




MVC 0(&KEYLEN, 13), 0(12) - Unblocked 
MVC 0(&KEYLEN,13),&KEYLOC-1(12) - 
Blocked Utility MVC for key 


SFilename.E 


224-227 ] 


E0-E3 




First entry in DSKXTN table (logical unit, cell 
number) 




232-235 2 


E8-EB 




4X'FF'-Endof DSKXTN table 


&Filename.K 


236+ 


EC-end 




Key area for add only. Number of bytes depends 
on key length, KEYLEN 



inimum number of entries is 2. 



1) Each entry in the DSKXTN table is four bytes long. The r 
There is one entry per extent. 

2) Location of the end-of-table indicator depends on length of DSKXTN table. 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


1 

0-15 i 


0-F 






Command Control Block (CCB). 


16 


10 


0-3 

4 


B'0000' 


Not used. 

1=DTF relocated by OPENR. 






5-7 


B'OOO' 


Not used. 


17-19 i 


11-13 






Address of logic module. 


20 | 


14 




X'lA' 


DTF type for OPEN/CLOSE 
(X'lA'^iskettefile). 


21 i 


15 







l=Command chained file. 






1-2 


B'OO' 


Not used. 






3 




l=Work area specified. 






4 


B'O' 


Not used. 






5 




l=Openi0=Close. 


! 




6 




l = lnput; 0=Output. 


| 




7 




Not used. 


22-28 ! 


16-1C 






Filename. 


29 


ID 




X'06' 


Device type code (X'06=3540). 


30-35 : 


1E-23 




C'OOCHROO' 


Address of HDR1 label in VTOC. 


36-37 


24-25 






Volume sequence number. 


38 


26 







Open communications byte. 

Input File 

l=No more extents 






1-2 


B'OO' 


Not used. 






3 




l=Exit for user's EOF routine. 






4 




l=Next extent on new volume. 






5-6 




Not used. 






7 




l=Extent switch. 
Output File 








1 




l=No more extents. 

l=£xtents needed at Close time. 






2-3 


B'OO' 


Not used. 






4 




l=Next extent on new volume. 






5 




l=Extent entered via console. 






6-7 




Not used 


39 


27 



0-7 




l=£xtent bypassed before file 
opened (input). 
Sequence number of current 
extent opened (output). 


40 


28 






Sequence number of last extent 
opened. 


41-43 ; 


29-2B 




X '000000' 


Reserved . 


44-47 


2C-2F 






Address of lOAREAl . 


48-51 


30-33 






Address of last Read/Write CCW 
in chain. 


52-53 


34-35 




x'ooor 


Lower record limit. 


54-57 : 


36-39 




X'OOCCOORR' 


End-of-data seek address (last 
record + 1) 


58-59 ; 


3A-3B 






Number of records in I/O area 
(used in short chain processing). 


60-63 


3C-3F 




X'OOFFOOOl' 


Seek argument (0CHR). 


64-67 


40-43 






End-of-file routine address 
(input); 4X'00" (output). 


68-71 


44-47 




X'0049001A , 


Seek argument control field. 


72 i 


48 




i 


Command chaining factor. 



DTFDU (....Continued) 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


73 


49 



1 
2 
3 

4 


B'O' 


Switch byte 1 . 

l=Not first entry after open. 

Not used. 

l=ln close routine (output). 

l=Error chain to be skipped. 

l=End of extent. 






5-7 


B'OOO' 


Not used. 


74-75 


4A-4B 






(record size multiplied by 
command chain factor)- 1. 


76-80 


4C-50 




X'FFFFFFFFFF' 


Seek argument bucket. 


81-83 


51-53 




X'OOOOOO' 


Reserved. 


84-87 


54-57 






Instruction to load user's I/O 
register (or NOP). 


88-91 


58-5B 






'Address of current I/O area. 


92-95 


5C-5F 






Logical record size. 


96-99 


60-63 






Address of last byte of the 
I/O area. 


100 


64 



1 
2 
3 
4 
5-7 




Logical indicators. 
1: ERROPT=address. 
1: ERROPT=IGNORE. 
1: ERROPT=SKIP. 
Not used. 
l=Two I/O areas. 
Not used. 


101-103 


65-67 






Address of user's error handling 
routine. 


104 


68 






CCW count (write command 
only). 


105 


69 




1 
2 




Allowed operations 
l=Allow read commands. 
l=Allow write commands. 
l=Suppress unit check on C4/C6. 






3-7 


B'OOOOO' 


Not used. 


106 


6A 




X'OO' 


Sector factor (X'00'=128). 


107 


6B 




X'OO' 


Reserved . 


108 


6C 



1 
2 
3 
4 
5 
6 




l=Write protect. 

l=NofeedatEOF. 

l=Check multivolume sequence. 

l=Multivolume file. 

l=Verify requested. 

I=c6s written (update ERMAP) . 

l=Read/Write security. 






7 


B'O' 


Not used. 


109-111 


6D-6F 




X'OOOOOO' 


Not used. 


112-119 


70-77 






Feed CCW. 


120-127 


78-7? 






Define ops CCW (output); 
8X'00' (input). 


128-135 


80-87 






Seek CCW. 


136-143 


88-8F 






TIC CCW. 


144-X 


90-Y 




X=143+6*(/of CCWs) 
Y=8F+3*(/ of CCWs) 


Read/Write data CCWs, 1,2, 13, 
or 26. 
Read/Write CCWs. 


X+l 


Y + l 




.. 


NOP CCW (output only). 



DTFPH (Magnetic Tope) 



Bytes 


Bits 


Contents 


Function 


Dec 


Hex 


-15 


00-0F 






CCB 


16 


10 


0-1 
2 
3 
4 

5 
6 

7 




Not used 

COBOL open; ignore option 

Not used 

DTF Table address; constants relocated 

by OPENR 

Not used 

1= ASCII 

0= EBCDIC 

Not used 


17-19 


11-13 




3X'00' 




20 


14 




X'12' 
X'14' 


Standard labeled, output 
Standard labeled, input, forward 


21 


15 


0-3 

4 

5-7 




Not used 

1= input; 0= output 

Not used 


22-29 


16- ID 






Symbolic filename 


30 


IE 






Not used 


31 


IF 


0-4 

5 

6-7 


B'01100' 


Used as displacement by OPEN 








Reserved 


32 


20 




1-2 

3 

4 

5 

6-7 




1= Standard labels 

Not used 

l=No rewind 

Not used 

User label address; l=yes, 0= no 

Not used 


33-35 


21-23 






User label routine address 


36 


24 



1 
2 
3 
4 
5-7 




1= DTFPH table 

Not used 

File switch: 1= input, 0= output 

Not used 

1= EOF switch 

Not used 


37-39 


25-27 






User label exit 


40-43 


28-2B 




DCF'0' 


Reserved for OPEN 


44-87 


2C-57 






EOV routine 


88-89 


53-59 




DC 2X'00' 


Reserved for OPEN 


90-95 


5A-5F 




DC 6X'00' 


File serial number 


96-99 


60-63 




DC 4X'00' 


Volume sequence number 


100-103 


64-67 




DC 4X'00' 


File sequence number 



DTFPH (Sequential Disk) 



Bytes 


Bits 


Function 


Dec 


Hex 


-15 


00-OF 




CCB 


16 


10 



1 
2 
3 
4 
5-7 


1= Dequeue old volume extents 

Not used 

l=File assigned MGN' (COBOL) 

Not used 

1= DTF relocated by OPENR 

Not used 


17-19 


11-13 




3X'00' 


20 


14 




DTF type (X '21') 


21 


15 



1 
2 
3 
4 
5 
6 
7 


Open/Close indicators 

1=2321 (Version 1-2 only) 

1= Blocked files 

1= Work file 

1= Work area 

1= Not version 1 table type 

l=Open; 0= Closed 

1= Input; 0= Output 

1= User labels specified 


22-28 


16-1C 




Filename (See byte 29) 


29 


ID 




Device type code: X ' 05 '= 3330-1 1 
X'00'=2311 X' 07 '=3350 
X'01'= 2314,2319 X' 08 '= 3340 general 
X'02'=2321 X '09'= 3340 35MB 
XW= 3330-1, -2 X'OA'= 3340 70MB 


30 


IE 




C'F '= EOF indicator for DTFPH 


30-35 


1E-23 




(BCCHHR) Address of Fl label in VTOC (output) 
(BCCHHR) Address of next DLBL-EXTENT record (input) 


36-37 


24-25 




Volume sequence number 


38 


26 




Open communication byte: 
Output 







1 
2 
3 

4 
5 
6 

7 


1= No more EXTENTS 

1= EXTENTS for LIOCS at close 

1= Process trailer labels 

1= Process header labels 

1= New volume on next extent 

1= EXTENTS entered via console 

1= Process trailer labels at close 

1= Check EXTENT for minimum of 2 tracks 

Input 







1 
2 
3 
4 
5 


•1= No more EXTENTS 
Not used 

1= No F 1 label, process EXTENTS only 
Not used 

1= New volume on next EXTENT 
Not used 



DTFPH (Sequential Disk) (. . .Cont'd) 



By 


tes 


Bits 


Function 


Dec 


Hex 


38 


26 




Open communications byte (Input) (Cont'd) 




(Cont'd) 




6 
7 


1= Process header labels 
Not used 




39 


27 




Sequence number of current EXTENT being opened 




40 


28 




Sequence number of last EXTENT opened (not a console EXTENT 


41-43 


29-2B 




Address of user's label routine 


44-47 


2C-2F 




Address of IOAREA1 




48-51 


30-33 




CCHH address of user's label track. Initially X'80000000 




52-53 


34-35 




Lower head limit (HH) X'0000' if type 1; X'OOnn' if type 
(n=head limit) 


128 


54-57 


36-39 




EXTENT upper limit (CCHH) 




58-59 


3A-3B 




BB seek address: 

X'0000' if disk device 

X'OOnn' if 2321 whre 'nn'=bin number 




60-63 


3C-3F 




EXTENT lower limit (CCHH) 




64 


40 




Record number: 1= Input; 0= Output 




65-67 


41-43 




Not used 




68-71 


44-47 




CCHH control bucket 
CCHH=X'OOC80009'if 2311 - type 1 
CCHH=X'OOC80013'if 2314 or 2319 - type 1. 
CCHH=X'13090413'if 2321 - type 1 
CCHH=X'01940012'if 3330 - type 1 
CCHH=X'0328001 2' if 3330-11 - type 1 
CCHH= X'015COO0B' if 3340 35MB 
CCHH= X-02B8000B ' if 3340 70MB 
CCHH=X'022B001D' if 3350 - type 1 




72 


48 




Record number 




73 


49 




Not used 




74-75 


4A-4B 




Not used 




76-80 


4C-50 




CCHHR bucket= extent lower limit and record number 




81-83 


51-53 




Not used 





Note : where nn = current upper head number 



DTFPH (DAM FILES) 



Bytes 


Bits 


Function 


Dec 


Hex 


0-15 


O-F 




CCB 


16 


10 




X'08* indicates DTF relocated by OPENR. 


17-19 


11-13 




SX'OO'. 


20 


14 




DTF type (X'23'). 


21 


15 




Option codes. 








1 


l=Oufpot, 0=lnput. 
Not used. 






2 


Not used. 






3 


Not used. 






4 


Not used. 






5 


Not used. 






6 


1=2321 (Version 1/2 only). 






7 


Not used. 


22-28 


16-1C 




Filename 


29 


ID 




Device type code : 
X'00' = 231 1 
X'0r = 2314, 2319 
X'02' = 2321 
X'04' =3330-1, -2 
XW= 3330-11 
X*07*= 3350 
X'08' = 3340 general 
X'09* = 3340 35MB 
X'0A'= 3340 70MB. 


30-31 


1E-1F 




Logical unit address of first volume containing 
the file. 


32 


20 




X'40'=Device supports RPS. 


33-35 


21-23 




Address of user label routine. 


36-39 


24-27 




Address of user routine to process EXTENT information. 



DTFPH (DISKETTE) 



Bytes 




Bits 


Function 


Dec 


Hex 


0-15 


« 




CCB. 


16 


10 


o 


l=Dequeue old volume extents. 






1-3 


Not used. 






4 


1=DTF relocated by OPENR. 






5-7 


Not used. 


17-19 


11-13 




aX'OO". 


20 


14 




DTF type(X , 21'). 


21 






Open/close indicators. 






0-2 


Not used. 






3 


l=Work area. 






4 


l=Not version 1 DTF table type. 






5 


l=Open; 0=Closed. 






6 


l=lnput ; 0=Output. 






7 


Not used. 


22-28 


16-1C 




Filename (see byte 29). 


29 


ID 




Device type code (3540=X'06'). 


30 


IE 




C'F'=EOF indicator for DTFPH. 


30-35 


1E-23 




(OCHROO) Address of HDR1 label in VTOC 
(output). 


36-37 


24-25 




Volume sequence number. 


38 


26 




Open communications byte. 
Input 






o 


l=No more extents. 






1-3 


Not used. 






4 


l=New volume or new extent. 






5-7 


Not used. 
Output 








1 


I=No more extents. 
l=Extents for LlOCS at close. 






2-3 


Not used. 






4 


l=New volume on next extent. 






5 


l=Extents entered via console. 






6 


Not used. 






7 


l=Check extent for minimum of 2 tracks. 


39 


27 




Sequence number of current extent being opened. 


40 


28 




Sequence number of last extent opened (not a console 
extent entry). 


41-43 


29-2B 




Not used. 


44-47 


2C-2F 




Address of IOAREA1. 


48-51 


30-33 




Not used. 


52-53 


34-35 




X'OOOO'. 


54-57 


36-39 




Extent upper limit ( 0CHR). 


58-59 


3A-3B 




Not used. 


60-63 


3C-3F 




Extent lower limit (0CHR). 


64 


40 




Record number. l=lnput, 0=Outpur. 


65-67 


41-43 




Not used. 


68-71 


44-47 




0CHR control bucket. 

0CHR= X'0049001A' for 3540 (output only). 


72 


48 




Record number. 


73 


49 




X'10' - multivolume file (input) 

X'40' - last volume on multivolume file (input). 



DTFPH (DISKETTE) (... Continued) 



Bytes 


Bits 


Function 


Dec 


Hex 


74 
75 
76-80 

81-83 


4A 
4B 
4C-50 

51-53 




Record size (maximum of 128) 

Not used. 

OCHR bucket = extent lower limit and record 

number (output). 

Not used. 



Bytes 


1 

; Bits 


1 

! Function 


Dec 


Hex 


0-15 


00-0F 




j CCB. If RPS is supported, the CCW address in bytes 
: 9-1 1 (09-0B) is changed by OPEN to point to an 
; RPS CCW string in the user virtual area. CLOSE 
j restores it. 


16 


10 


0-1 


i Not used. 






2 


i COBOL open; ignore option. 






: 3 


! Not used. 






1 4 


1 DTF table address constants relocated by OPENR. 






! 5-7 


; Not used. 


17-19 


11-13 




| Address of logic module. If RPS is supported, OPEN 
• changes this address to point to an RPS version of the 
| logic module in the system virtual area. CLOSE 
: restores it. 


20 


14 




i DTF Type =X'33\ 


21 


15 




i Open/Close indicators - X'02'=input, X'00'=output. 


22-28 


16-1C 




Symbolic filename. 


29 


ID 




DASD or diskette device indicators 
i X'00'=2311 

X'01'=2314, 2319 

X'04^ 3330-1, -2 

X*05 % = 3330-1 1 
1 X*07*=3350 

X'08'=3340 general 














- X'09'=3340 35MB 








X'0A'=334070MB. 


30-35 


IE -23 




DASD address of format-1 label. 


36-37 


24-25 




DASD or diskette volume sequence number. 


38 


26 




. Open communications switch. 






i 


l=Nomore extents —diskettes. 






1-3 


Not used. 






4 


Always 1. 






5-7 


Not used. 


39 


27 




Sequence number of current extent. 


40 


28 




Sequence number of last extent, or X'80" for 1442 
reader punch . 


41 


29 




Open indicator = X'20". 


42 


2A 




: Device type indicators : 






1 

I 1 


; Unused. 

\ 1=DTF has been extended into the partition GETVIS 






2 


! 1=DASD 






1 3 


| l=tape 






1 4 


: Imprinter 






| 5 


l=punch 






I 6 


' l=reader 






7 


; 1=RPS supported. 


43 


2B 


| 


! Logic module device indicators : 
| X'F3' = DASD or diskette device. 
| X'Fl' = reader or tape device. 
j X'FO' = other type devices. 



DTFDI (...Continued) 



Bytes 


Bits 


Function 


Dec 


Hex 


44 


2C 




Logic module option switches 







1 


1=input, 0=oufput. 

l=e|ect for RDR-PCH; 0=no eject. 






2 


l=not first pass; 0=first pass. 






3 


l=two I/O areas; 0=one I/O area. 






4 


1=2540 Punch. 






5 


1=SYSLST/SYSPCH. 






6 


l=Tape SYSLST/SYSPCH. 






7 


1=ASCII ;0=EBCDICcode. 


45-47 


2D-2F 




Alternate I/O area address. 


48-51 


30-33 




Reserved for future use . 


52-53 


34-35 




Extent lower head limit. 


54-57 


36-39 




Extent upper head limit. 


58-64 


3A-40 




DASD seek address . 

Diskette seek address at byte 60 (3C). 


65-67 


41-43 




Users EOF address. 


68-72 


44-48 




Control bucker CCHHR. 

Byte 72 (48) always X'01' for diskettes. 


73 


49 




Logic module switches 

X'01 "=input 

X'00'=output 

X'00'=both input and output on diskettes. 


74-75 


4A-4B 




Logic module constants 
X'0020' DASD output 
X'0018' DASD input 
X'0008* Diskette devices 
X'0000' Non-DASD devices. 


76-80 


4C-50 




Count field CCHHR (0CHR0 for diskettes). 


81 


51 




Key length. 


82-83 


52-53 




Data length. 


84-87 


54-57 




Instruction to load IOREG with correct I/O area 
address . 


88-103 


58-67 




Seek, Search CCWs. 

Seek, Read/Write CCW for diskette files. 


104-111 


68-6F 




TIC CCW. 

NOP CCW for diskette output files; unused for 

diskette input files. 


112-119 


70-77 




Input/output CCW. 


120-127 


78-7F 




Second output CCW. 


128-151 


80-97 




Verify CCWs for output. 


152-159 


98-9F 




Error CCW1 . 


160-167 


A0-A7 




Error CCW2. 


168-231 


A8-E7 




Save area (64 bytes). 


232-235 


E8-EB 




DC A(WLRERR) if WLRERR=Address. 
B 28(15) if ERROPT=omitted. 
B 25(15) if ERROPT=SKIP. 
B 28(15) if ERROPT=IGNORE. 


236-239 


EC-EF 




DC A(ERROPT) if ERROPT=Address. 
B 0(15) if ERROPT=omitted. 
B 24(15) if ERROPT=SKIP. 
B 28(15) if ERROPT=IGNORE. 



DTFCP 


(DISK=YES) 




Bytes 


Bits 


Function 


Dec 


Hex 


0-15 


00-OF 




CCB. If RPS is supported, the CCW address in bytes 
9-11 (09-OB) is changed by OPEN to point to an RPS 
CCW string in the user virtual save area. CLOSE 
restores it. 


16 


10 




1 


Not used 

Set by Maint; indicates that LIOCS must retrieve 

extents from the VTOC instead of the label cylinder. 






2 


COBOL open; ignore option. 






3 


X'10' indicates an unlabeled FORTRAN tape. 






4 


DTF table address constants relocated by OPENR. 






5 


Used by FORTRAN (Sequential Disk Backspace and 
Rewind). 






6 


1 = ASCII, = EBCDIC. 






7 


FORTRAN is calling DTFCP. 


17-19 


11-13 




Logic module address. If RPS is supported, OPEN 
changes this address to point to an RPS version of the 
logic module in the system virtual save area. CLOSE 
restores it. 


20 


14 


I DTF type X'32' except in the case of disk assigned to 
| units SYSOOO to SYSnnn. In this case, a DTFCP open 
! phase changes it to X'20'. 


21 


15 


; Open indicators : X'02' input, X'OO' output, except 
; for tapes assigned to SYSOOO to SYSnnn when 








X'OO" = input and X'08' is output. 








X'08* DISK=YES indicator. 









1 = no rewind, = rewind. 


22-28 


16-1C 




Filename (see byte 29). 


29 


ID 




Device type code : 
X'00' = 2311 
X'01^2314, 2319 
X'04' =3330-1, -2 
X*05*= 3330-11 
X-07*= 3350 
X'08' = 3340 general 






X'09' = 3340 35MB 






X'0A'= 3340 70MB. 


30-35 


1E-23 j 


File address for disk; block count if bit 7 of byte 16 


36-37 


24-25 


Volume sequence number or work area. 


38 


26 


Open switch 


39 


27 


Sequence number of current extent. 


40 


28 


Sequence number of last extent, or X'80" if 1442 punch. 


41 


29 


X'80' indicates request for standard label tape OPEN. 


42 


2A 


X'80" device is a 2560. 

X'40' DTF has been extended into the user virtual 






save area 






| X*20' device is a DASD 






1 X'10' device is a tape 






i X'08' device is a printer 






; X'04' device is a punch 






• X'02' device is a reader 






| X'OVRPS is supported. 


43 

1 


2B 


! X'F3' device is a DASD 
j X'Fl' device is a reader 
j X'FO* device is other type. 



DTFCP (DI5K=YES) (...Continued) 



Byfes 


Jn 


Function 


Dec 


Hex 


44 


2C 




1 

2 
3 

4 
5 
6 

7 


l=input, 0=output. 
; l=eject needed for a reader punch; 0=no eject. 
0=first pass, l=not first pass. 
l=two I/O areas, 0=one I/O area. 
1=2540 punch. 
1=SYSLST or SYSPCH. 
1=SYSLST or SYSPCH on output tape. 
1=TLBL is present and tape is labeled. 




45-47 


2D-2F 




IOAREA2 address. 




48-51 


30-33 




X'80000000'. 




52-53 


34-35 




Lower head limit. 




54-57 


36-39 




Extent upper limit. 




58-64 


3A-40 




BBCCHHR seek address. 




65-67 


41-43 




EOF address. 




68-71 


44-47 




Control bucket CCHH. 




72 


48 




Number of record per track for output, number of 
record per track +1 for input. 




73 


49 




X'00' for output, X'01' for input. 




74-75 


4A-4B 




X'0020" for output, X'0018' for input for DASD 
X'0008' for 2560 and 5425 output. 
X'0000' for nondisk device. 




76-80 


4C-50 




CCHHR for count field. 




81 


51 




Key length. 




82-83 


52-53 




Data length. 




84-87 


54-57 




Instruction to load user I/O area address to I/O 
register. 




88-111 


58-6F 




Seek, search, TIC CCWs. 




112-119 


70-76 




CCW for DASD input and first CCWfor DASD output. 
This CCW can be used for other device if unit is not 
a DASD 




End-of-tc 


able if DTF 


is define 


1 for an input file 




120-127 


77-7? 




Second CCW for output. 




128-151 


80-97 




Verify CCWs for output. 




End-of-tc 


»ble if DTF 


is define< 


i for output file and DEVADDR does not equal SYSPCH. 




152-159 


98-9F 




2540 punch error recovery CCW 1 . 




160-167 


A0-A7 




2540 punch error recovery CCW 2. 




168-231 


A8-E7 




Reserved. 


- 


When the 


CPopen i 


litializes 


the table and determines that the device is a 2540 punch, 


the follov 


*ing bytes 


n the tab 


e are changed : 




30 


IF 




X'FF' indicator to DTFCP open phases and logic module. 




32-35 


20-23 




Instruction to load user I/O area to I/O register. 




48-55 


30-37 




CCW. 




56-63 


38-3F 




2540 punch error recovery CCW 1 . 




64-71 


40-47 




2540 punch error recovery CCW 2. 




72-151 


48-97 




80-byte card image, savearea 1 . 




152-231 


98-E7 




80-byte card image, savearea 2. 


1 



DTFCP (DISK=YES) (...Continued) 



Bytes 


! 

Bits j Function 


Dec j Hex 


When the CP open initializes the table and determines that the device is a 2560 or 
5425, the following bytes in the table are changed : 


32-35 

48-55 

56-63 

64 

65 


20-23 

30-37 

38-3F 

40 

41 


1 Instruction to load user I/O area to I/O register. 
! First output CCW. 

; Second oufput CCW. 

i Stacker select character V for ASCII. 

\ Stacker select character W for EBCDIC. 

1 



DTFCP (DISK=NO) 



Bytes 




Bits 


1 Function 


Dec 


Hex 


0-15 


00-0F 




CCB. 


16 


10 


0-1 


Not used. 






2 


; COBOL open; ignore option. 






3 


; Not used . 






4 


DTF table address constants relocated by OPENR. 






5 


! Not used. 






6 


j 1=ASCII (used only if DISK=YES), 0=EBCDIC 
i (used only if DISK=YES). 






7 


! FORTRAN is calling DTFCP. 


17-19 


11-13 




| Logic module address. 


20 


14 




; DTF type X'32' except in the case of tape assigned 
i to units SYS000 to SYSnnn. In this case, a DTFCP 
: open phase changes it to X'10". 


21 


15 




; Open indicators X'02' input, X'00' output (except 
1 for tapes assigned to SYS0OO to SYSnnn when it is 
| X'00' input, X'08' output). 


22-28 


16-1C 




! Filename (see byte 29). 


29 


ID 




i Reserved for future use . 


30 


IE 




! Indicator to DTFCP open phase and logic module. 
; X'FF' for input files, 
i X'00' for output files. 


31 


IF 




; Reserved for future use. 


32-35 


20-23 




: Instruction to load user's I/O area address into 
' I/O register. 


36-37 


24-25 




! Volume sequence number or work area. 


38 


26 




- Open switch. 


39 


27 




' Sequence number of current extent. 


40 


28 




! Sequence number of last extent, or X'80' if 1442 punch. 


41 


29 




X'20\ 


42 


2A 




! X'80' device is a 2560. 
; X'40' device is a 5425. 
1 X'10' device is a tape. 
| X'08' device is a printer. 
: X'04' device is a punch. 
! X'02' device is a reader. 


43 


2B 




j X'Fl' device is a reader or tape. 
j X'FO' device is other type. 


44 


2C 



1 


i l=input, 0=output. 

i l=eject needed for a reader -punch, 0= no eject. 






2 


j l=not first pass, 0=first pass. 






3 


i l=two I/O areas, 0=one I/O area. 






4 


j 1=2540 punch. 






5 


! 1=SYSLST or SYSPCH. 






6 


j 1=SYSLST or SYSPCH on output tape. 






7 


1 Reserved for future use. 


45-47 


2D-2F 




! IOAREA2 address. 


48-55 


30-37 




1 CCW. 


End -of -t 


able if DTF 


is defined as output file and DEVADDR is not equal to SYSPCH. 



DTFCP 'DISK=NO) (...Continued) 



Bytes 


Bits 


Function 


Dec 


Hex 


56-63 


38-3F 




2540 punch error recovery CCW 1 . 




64-71 


40-47 




2540 punch error recovery CCW 2. 




65-67 


41-43 


EOF address, input only. 




End-of -table If DTF 


is defined as input file 




72-151 1 48-97 


! 

• 80-byte card image, save area 1. 




152-231 j 98-E7 


1 80-byte cord image, save area 2. 

1 




If the device is a 25 


60 or 5425, bytes 56 onward contain the following information. 


" 


56-63 ) 38-3F 


j Second output CCW. 


64 ! 40 


! Stacker select character V for ASCII. 




65 ■ 41 


i Stacker select character W for EBCDIC. 




66-75 42-4B 


', Reserved for future use. 




76-235 i 4C-EB 


1 First I/O area. 




236-237 | EC-ED 


: Reserved . 




238-317 1 EF-13D 


; Second I/O area. 




318-319 j 13E-13F 

-J 


j Reserved. 

1 





DTFCP (DISK=PARAMETER OMITTED) 



Bytes 


Bits 


Function 


Dec 


Hex 


0-15 


00-0F 




; ccb 


16 


10 


0-1 


i Not used. 






2 


! COBOL open; ignore option. 






3 


I Not used. 






4 


| DTF table address constants relocated by OPENR. 






5 


Not used. 






6 


1=ASCII (used only if DISK=YES), 0=EBCDIC 
(used only if DISK=YES). 






7 


Used by FORTRAN 


17-19 


11-13 




Logic module address. 


20 


14 




DTF type X'3T except in the case of tape assigned to 
units SYS000 to SYSnnn. In this case DTFCP open 
phase changes it to X'10'. 


21 


15 




Open indicators X'02' input, X'00' output (except for 
tapes assigned to SYS000 to SYSnnn when it is X'00' 
input, X'08" output. 


22-28 


16-1C 




Filename. 


29 


ID 




Reserved for future use. 


30 


IE 




X'00' indicator to DTFCP open phases and logic 


31 


IF 



1 


l=input, 0=output. 

l=eject needed for a read punch, 0=no eject. 






2 


l=not first pass, 0=first pass. 






3 


l=two I/O areas, 0=one I/O area. 






4 


1=2540 punch. 






5 


1=SYSLST or SYSPCH. 






6 


1=SYSLST or SYSPCH on output tape. 






7 


1=TLBL specified and tape is labeled. 


32 


20 




Open indicators. 


33-35 


21-23 




IOAREA2 address. 


36-39 


24-27 




Instruction to load user's I/O area address into 
I/O register. 


40-47 


28-2F 




CCW. 


End of tol 


ale if DTF 


s definet 


as output file and DEVADDR is not equal to SYSPCH. 


48-55 


30-37 




2540 punch error recovery CCW 1 . 


56-63 


38-3F 




2540 punch error recovery CCW 2. 


57-59 


39-3B 




EOF address, input only. 


End of tol 


3 le if DTF 


« defined 


as input file. 


64-143 


40-8F 




80-byte card image, save area 1. 


144-223 


90-13F 




80-byte card image, save area 2. 



DTFCP (DISK=PARAMETER OMITTED) 



Bytes 


1 
Bits j 


Function 


Dec | Hex 


For 2560 and 5425 bytes 48 onwards contai 


i the following information : 


48-207 | 30-CF 
208-209 j D0-D1 
210-369 ! D2-171 
370-371 j 172-173 
372-451 j 174-1C3 


I 

• IOAREA1. 
: Reserved 
, 10AREA2. 
j Reserved 
l Compare are 





DTF - Toble Types 



DTF Type Code 






(Byte 20) 






of DTF Table 


DTF 


Description 


X'00 1 


DTFCD 


Combined files 


X'01' 


DTFPT 


Paper tape files 


X'02' 


DTFCD 


Reader and 3881 Optical Mark Reader files 


X'03' 


DTFCN 


Console 


X'04' 


DTFCD 


Punch files 


X'05' 


DTFCD 


Reader files on 2560, 5425 


X'07' 


DTFPR 


Printer files on 2560 


X'08' 


DTFPR 


Printer files 


X'09' 


DTFOR 


Optical Reader files except 3881 and 3886 files 


X'OA' 


DTFOR 


Optical Reader files (HEADER=YES) 


X'OB' 


DTFMR 


Magnetic Ink Character Recognition (MICR) 
and Optical Reader/Sorter files 


X'OC 


DTFDR 


3886 Optical Character Reader files 


X'10' 


DTFMT 


Magnetic tape workfiles 




DTFCP 


Magnetic tape workfiles (compiler). (Note 1) 


X'll' 


DTFMT 


Nonstandard or unlabeld tape files 


X'12' 


DTFMT 


Standard labeled, output tape files 




DTFPH 


Standard labeled, output tape files 
(physical IOCS) 


X'13 1 


DTFMT 


Standard labeled, input tape files (read backward) 


X'14' 


DTFMT 


Standard labeled, input tape files (read forward) 


X'lA' 


DTFDU 


Diskette Input/Output Unit files 


X'20' 


DTFSD 


Sequential DASD workfiles and data files 




DTFCP 


DASD workfiles (compiler) 


X'21' 


DTFPH 


Sequential DASD files, MOUNTED=S INGLE 
(physical IOCS) 


X'22' 


DTFDA 


Direct access files 


X'23' 


DTFPH 


Direct access files, MOUNTED=ALL (physical 
IOCS) 


X'24' 


DTF IS 


Indexed sequential, LOAD file 


X'25' 


DTF IS 


Indexed sequential, ADD file 


X'26' 


DTF IS 


Indexed sequential, RETRVE file 


X'27' 


DTF IS 


Indexed sequential, ADDRTR file 


X'28' 


ACB 


Access Method Control Block for VSAM 


X'30' 


DTFCP 


Compiler file for DOS Version 1 (Note 1) 


X'31' 


DTFCP 


Compiler file for DOS Versions 2 onward 


X'32 1 


DTFCP 


Compiler file for DOS Versions 2 onward (Note 2) 


X'33' 


DTFDI 


Device independent system unit files 


X'40' 


DTFBT 


Basic Telecommunication Access Method (BTAM) 
file (Note 3) 


X'50' 


DTFQT 


Queued Telecommunication Access Method 
(QTAM) file (Note 3) 


X'60' - X'67' 







DTF type is X'30' except for tape or DASD assigned to units SYSOOO to 
SYSnnn. In this case, the DTFCP open phases change the DTF type to 
X'10' for tape workfiles, or X'20' for DASD workfiles. 



DTF - Table Types ( Continued) 



Notes (continued) 

2. DTF type is X'32' except for DASD assigned to units SYSOOO to SYSnnn. 
In this case, the DTFCP open phases change the DTF type to X'20' for 
DASD workfiles. 

3. The following control unit codes are ORed into the low-order 4 bits of 
the DTF type code . 



2848 3 

2701 4 

2702 5 

2703 6 



RPS DTF/MODULE RELATIONSHIP 




RPS DTF-Extention 



RPS Channel Program 
(Variable length) 



144 (X'90 1 ) 

Sector values (5) (ISAM only) 



172 (X-AC) 

Sector values (up to 4) (except ISAM) 



176 (X'BO') 

Address of original channel program 



180 (X'B4') 

Address of original logic module 



72 Byte Register Save Area 



256(X'100') 



Additional Work Space 
256 bytes for DAM 
128 bytes for ISAM 
(This field is not present for SAM or Device Independence) 



CHAPTER IV 

DOSAS SUPERVISOR CONTROL BLOCKS AND AREAS 



Generated Code 



SUPVR 


Hardware/software interface (PSWTs logout 


/L 




areas, etc. 






FOPT 


Basic tables and constants (System Communi- 






cation Region, Background Comm. Region, 








etc.) General entry and exit roullues must 


R0 




be below 4K 


Rll 


PIOCS 


Cancel exit and RESVC-routine 








SGSVC 


Some SVC routines 




R12 




IJLQTSVC 


QTAM SVC routines 








IOTAB 


Some constants and tables, that must be 










below 8K 








PIB tables, option tables, l/O tables 








ground Comm. Regions, etc., having Y-type 








address pointers in low storage. Must be 








below 32K. 


,, 


SMICR 


External interrupt handler 




R14 


IOINTER 


I/O interrupt handler 




R9 


SGDSK 


Disk error recovery routine 




R13 




Transient areas (CRT, LTA, PTA) 






DISP 


Task selection 




R6 


SGDFCH 


Fetch routine 




R6 


SGCCWT 


CCW-translation routine 




R9,R11 


SGPMAIN 


Page Managers main routines 




R14,R15,R13J 


SGPSUB 


Page Manager subroutines 




SGSVCX 


Some SVC routines 




R7,R14, 


SGAM 


CDLOAD,GETVIS and FREEVIS routines 




R14 


SGPOPT 


Paging optimization routines 




R13 


MCRAS 


Machine/channel check handler, RTA 




R15 


SGSCVRT 


RPS convert routine 




R9 


SGIOS 


Channel scheduler routine 




R13 


SGSER 


Service task for 3340 site determ. 




R13 


SGCFCH 


Fetch SVC routines 




R13 


SGERP 


Interface to ERP transients 




R13 


SGAP 


Asynclir processing SVC routines 




R13 


SGRM 


Resource management SVC routines 




R13 


SGATAB 


Tables having A-type address pointers 
in low storage 














SEND 


PDAID area, page frame tables. 






SGEND 


IPL Initial itation routine. 








CCW-translation copy buffers 











Supervisor Storage Allocatic 



SUPERVISOR CALLS 



SVC 




Function 


Dec 


Hex 


Macro supported 








EXCP 


Execute Channel Program 


1 


1 


FETCH 


Fetch any phase 


2 


2 




Fetch a logical transient (B-transient) 


3 


3 




Force dequeue 


4 


4 


LOAD 


Load any phase 


5 


5 


MVCOM 


Modify supervisor communication region 
(if issued by MVCOM macro) 
Fetch another physical transient 
(if issued by a physical transient) 


6 


6 


CANCEL 


Cancel a problem program or task 


7 


7 


WAIT 


Wait for a CCB or TECB 


8 


8 




Transfer control to the problem program from a 
logical transient (B-transient) 


9 


9 


LBRET 


Return to a logical transient (B-transient) from 
the problem program after an SVC 8 


10* 


A 


SETIME 


Set timer interval 


11 


B 




Return from a logical transient (B-transient) 


12 


C 




Logical AND (Reset) to second job control byte 
(displ.57 in comm. region), or reset PCIL being 
condensed bit (displ.59 in comm. region) 


13 


D 




Logical OR (Set) to second [ob control byte 
(displ.57 in comm. region), or reset PCIL being 
condensed bit (displ.59 in comm. region) . 


14 


E 


EOJ 


Cancel job and go to Job control for end of job step 


15 


F 


SYSIO 


Headqueue and execute channel program 


16* 


10 


STXIT(PC) 


Provide supervisor with linkage to user's PC 
routine for program check interrupts 


17* 


11 


EXIT(PC) 


Return from user's PC routine 


18* 


12 


STXIT(IT) 


Provide supervisor with linkage to user's IT routine 
for interval timer interrupts 


19* 


13 


EXIT(IT) 


Return from user's IT routine 


20* 


14 


STXIT(OC) 


Provide supervisor with linkage to user's OC routine 
for external or attention interrupts (operator comm.) 


21* 


15 


EXIT(OC) 


Return from user's OC routine 


22 


16 




Seize/Release system; 

Enable/disable external and I/O 

interrupts; 

Set key in user's PSW 


23* 


17 




Load phase header. Phase load address is stored at 
user's address 


24* 


18 


SETIME 


Set timer interval and provide supervisor with 
linkage to user's TECB, if any 



SUPERVISOR CALLS (. . . .Cont'd) 









'optional 


SVC 




Function 


Dec 


Hex 


Macro Supported 


25* 


19 




Issue HALT I/O on a teleprocessing device, or 
HALT I/O on any device if issued by OLTEP. 
With multiprogramming, dequeue an unstarted 
OLTEP I/O request to a shared device 


26* 


1A 




Validate address limits 


27* 


IB 




Special HIO on teleprocessing devices 


28* 


1C 


EXiT(MR) 


Return from user's stacker select routine (MICR 
type devices only) 


29* 


ID 


WAITM 


Provide support for multiple wait macro 
WAITM 


30* 


IE 


QWAIT 


Wait for a QTAM element 


31* 


IF 


QPOST 


Post a QTAM element 


32 


20 




Reserved 


33 


21 


COMRG 


• Provide address of partition com. reg. 

• Force task select for system tasks 


34 


22 


GETIME 


Provides Time-of-Day and updates the DATE field 


35* 


23 


HOLD 


Hold a track for use by the requesting task only 


36* 


24 


FREE 


Free a track held by the task issuing the FREE 


37* 


25 


STXIT(AB) 


Provide supervisor with linkage to user's AB rou- 
tine for abnormal termination of a task 


38* 


26 


ATTACH 


Initialize a subtask and establish its priority 


39* 


27 


DETACH 


Perform normal termination of a subtask. It includes 
calling the FREE routine to free any tracks held by 
the subtask 


40* 


28 


POST 


Inform the system of the termination of an event 
and ready any waiting tasks 


41* 


29 


DEQ 


Inform the system that a previously enqueued 
resource is now available 


42* 


2A 


ENQ 


Prevent tasks from simultaneous manipulation of a 
shared data area (resource) 


43 


2B 




Reserved , . 


44* 


2C 




Provide supervisor support for external creation of 
unit check records by specific request 


45* 


2D 




Provide emulator interface 


46* 


2E 




Provide OLTEP with the facility to operate in 
supervisory state 


47* 


2F 


WAITF 


Provide support for multiple wait macro WAITF 
for MICR type devices 


48 


30 




Fetch a CRT transient 


49 


31 




Used by VTAM to init. exec. of channel program 


50 


32 




Reserved for LIOCS error diagnostic 


51 


33 




Return phase header 



SUPERVISOR CALLS (....Cont'd) 



SVC 




Function 


Dec 


Hex 




52* 


34 


TTIMER 


Return the remaining time interval, or cancel 
a time interval 


53* 


35 




Used by VTAM to schedule user exit in opplic.progr. 


54 


36 


FREEREAL 


Release page frames to selection pool 


55 


37 


GETREAL 


Provide interface between SDAID and PDAID 
initialization routine and page management routine, 
to create the PDAID alternate area or the SDAID 
buffer area 


56 


38 




Reserved 


57 


39 




Reserved 


58 


3A 




Provide interface between job control and the 
supervisor. Get real storage for real jobs 


59 


3B 




Provide interface between EOJ and the supervisor. 
Reset the storoge key for virtual jobs 


60 


3C 


GETDACR 


Provide virtual address of location within I/O areas 
for ERP and CRT routines 


61* 


3D 


GETVIS 


Get storage in virtual partition 


62* 


3E 


FREEV1S 


Free storage in virtual partition 


63 


3F 


USE 


Use a resource 


64 


40 


RELEASE 


Release a resource 


65* 


41 


CDLOAD 


Load VSAM or CI phase 


66 


42 


RUNMODE 


Return mode in which program is running 


67* 


43 


PFIX 


Fix page(s) in real storage 


68* 


44 


PFREE 


Free page(s) in real storage 


69* 


45 


REALAD 


Return real address corresponding to a given virtual 
address 


70* 


46 


VIRTAD 


Return virtual address corresponding to a given real 
address 


71* 


47 


SETPFA 


Establish or terminate the linkage between the super- 
visor and a user page-fault appendage routine 


72* 


48 


GETCBUF/FREECBl 


JF] Get or free copy buffer for IDAL or tape ERP 


73* 


49 


SETAPP 


Allow linkage to channel and appendage routines 


74* 


4A 




Fix page(s) in real storage for restart 


75* 


4B 


SECTVAL 


Calculate a sector value (disk dev. with RPS feature) 


76 


4C 




Initiate recording on SYSRCC file 


77 


4D 


TRANSCSW 


Returns the virtual address of a copied CCW 



SUPERVISOR CALLS (...Cont'd) 



* optional 



SVC 


Macro supported 


Function 


Dec 


Hex 


78* 


4E 


CHAP 


Change subtask priority (supported 
if AP=YES) 


79* 


4F 


SYNCH 


Give control to synchronous exit. 


80* 


50 


SETT 


Set task time interval 


81* 


51 


TESTT 


Return the remaining task time 
interval or cancel a time interval. 


82-8452-54 




Reserved 


85* 


55 


RELPAG 


Release contents of one or more pages. 


86* 


56 


FCEPGOUT 


Force a page-out of one or more pages 


87* 


57 


PAGEIN 


Page-in one or more pages. 


88* 


58 


TPIN 


Start TP Balancing 


89* 


59 


TPOUT 


Stop TP Balancing 


90* 


5A 


PUTACCT 


Provide interface with POWER/VS for 
additional account information (by user) 


91* 


5B 




Provide interface with POWER/VS for 
standard account information (DOS/VS) 


92* 


5C 


XECBTAB 


XECB table manipulation 

(DBF INE, DELETE, CHECK an entry) 


93* 


5D 


XPOST 


Past an XECB 


94* 


5E 


XWAIT 


Wait on an XECB 


96* 


60 


EXIT (TT) 


Return form user's task timer exit 


97* 


61 


STXIT(TT) 


Provide supervisor with linkage to user's 
task timer exit routine for task time 
interval end. 



COMMAND CONTROL BLOCK (CCB) 



Count 
I 


Transmis 
sion infor 
motion 
2 3 


CSW 

Status 

Bits 

4 5 


and 


Reserved 
for 

logical 

IOCS 

8 


CCW 
Address 

9 11 


Reserved 
for 

physical 

IOCS 

12 


CCW 

in CSW 
13 15 


Optional 
Sense 
CCW 
16 23 



Byte(s) 


Description 


0-1 Used for residual 


Byte 1 


is also used by the BTAM Channel End 


Count. 


Appendage for fix requests. 


2-3 Transmitting in- 
formation between 


Byte 2 


Set on by: 


BitO: 


Traffic Bit (Wait) 


PIOCS * 


Physical IOCS & 




(Note 5) 




Problem Program 


Bit 1: 


EndofFile(/*or/&) 
3211-UCSB Parity Check (Line Com- 
plete) (Note 2) 


PIOCS 




Bit 2: 


Unrecoverable I/O error 


PIOCS 




Bit a 


Accept unrecoverable I/O error 


Pr.Pr.** 




Bit 4: 


Return DASD Data Checks, 3540 Data 
Checks,2671 errors, or 1017/1018 
errors to the user; indicate action- 
type messages for DOC; Return 5425 
not ready. 


Pr.Pr. 




Bit 5: 


Post at Device End (Note 5) 


Pr.Pr. 




Bit & 


Return Tape Read Data Check; 
1018 or 2560 Data Check;2520,2540, 
2560,3881 or 5425 Equipment Check; 
Accept 3504,3505 or 3525 Perm. Error; 
DASD Data Checks on Read or Verify 
Command on 3203, 3211, or 5203 
Passback Requested. 
(Notes 3,6 and 8) 


Pr.Pr. 




Bit 7: 


User Error Routine (Note 10) 


PnPr. 


Byte 3 


Set on by: 


BitO: 


DASD Data Check in Count Area; 


PIOCS 






Permanent Error for 3330, 3340 or 3350 








MICR-SCU Not Operational; 1287/ 








1288 Data Check; 3203, 3211, or 








5205 Print Check/Equipment Check; 








3540 Special Record Transferred 






Bit 1: 


DASD Track Overrun;MICR Interven- 
tion required; 1287-Keyboard Correct- 
ion in Journal Tape Mode; 1017- 
Broken Tape;32 1 1 -Print Quality/ 
Equipment Check. 


PIOCS 




Bit 2: 


DASD End of Cylinder;MICR-(Note4) 
1287/ 1288- Hopper Empty in Document 
Mode. 32 11/2245 Line Position Error. 
(Note 7) 





' Physical IOCS ** Problem Program 



COMMAND CONTROL BLOCK (CCB) (. . . .Cont'd) 



Transmfs 
sion infor 
mation 



CSW 
Status 



Reserved 
for 

logical 
IOCS 



CCW 
Address 



Reserved 
for 

physical 
IOCS 
12 



CCW 
Address 
in CSW 



Optional 
Sense 
CCW 
16 23 



Byte(s) 


Description 


2-3 ( Cont'd) 


Byte 3 


Set on by 


Bit 3: 2520, 2540, 3881 -Equipment Check;256( 
3203,5203,5425 Data Check/ 
Equipment Check; Tape Read Data 
Check; DASD-Any Data Check; 
1287-Equipment Check; 1017/1018 
Data Check; 3211-Print Check/ 
Data Check; 3504,3505,3525 Perm. 
Error (Note 8); 3540 Diskette Data 
Check. 

Bit 4: Non-Recovery Questionable Condition: 
Card- Unusual Command Sequence 
DASD- No Record Found 
1287/1288- Document Jam or Torn 
Tape; 3211- UCSB Parity Check(Com- 
mand retry); 5425 Not Ready. 

Bit 5: No Record Found Condition(Retry on 
2311,2314,2319,3330,3340 or 3350 

Bit 6: Carriage Channel 9 Overflow or Veri- 
fy Error for DASD; 1287-Document 
Mode-Late, Stacker Select; 1288-End 
of Page 

Bit 7: Command Chaining, Retry from the next 
CCW to be executed 


PIOCS 

PIOCS 

Pr.Pr. 
PIOCS 

Pr.Pr. 


4-5 CSW Status Bits 


Byte 4 (Note 1) 


Byte 5 


Bit 0: Attention 

1: Status Modifier 
2: Control Unit End 
3: Busy 
4: Channel End 
5: Device End 
6: Unit Check 
7: Unit Exeption 


Bit 0: Program Controlled 
Interruption 
1: Incorrect Length 
2: Program Check 
3: Protection Check 
4: Channel Data Check • 
5: Channel Control Check 
6: Interf. Control Check 
7: Chaining Check 


6-7 Type Code 

and Logical Unit 


Byte 6 


X'Ou' Original CCB 

X*08' Physical addressing is requested. Byte 7 
contain the PUB index. 

X'2u" Translated CCB 

X'4u' BTAM request original CCB 

X'6u' BTAM request translated CCB 

X'8u' User-translated CCB in virtual partition 

Note: Any one of the above incremented by X'10'(bit 
3 on) indicates automatic switching to the be- 
ginning of the next cylinder at End of Cylinder 
condition. 



COMMAND CONTROL BLOCK (CCB) (. . . .Cont'd) 



Transmis 
sion Infor 
motion 



CSW 
Status 



CCW 
Address 



Reserved 
for 

physical 
IOCS 
12 



CCW 
Address 
in CSW 
13 15 



Optional 

Sense 

CCW 

23 



Byte(s) 


Description 


6-7 (....Cont'd) 


Byte 6 (Cont'd) 

u: 0= The address in byte 7 refers to a System 
Logical Unit. 
1= The address in byte 7 refers to a Program- 
mer Logical Unit. 


Byte 7 


Hexadecimal representation of SYSnnn: 
SYSRDR = 00 SYSREC = OA 
SYSIPT = 01 SYSCLB = OB 
SYSPCH = 02 SYSVIS = 0C 
SYSLST = 03 SYSCAT = 0D 
SYSLOG = 04 SYSOOO = 00 
SYSLNK = 05 SYSOOI = 01 
SYSRES = 06 SYS002 = 02 
SYSSLB = 07 _J 
SYSRLB = 08 ",", 
SYSUSE =09 (Note9) 


8 Reserved for 
Logical IOCS 


Buffer Offset: 

ASCII Input Tapes X'OO'-X^* 

ASCII Output Tapes Fixed X'00' 
Variable X'00' or X'04' 
Undefined X'00' 


9-11 CCW Address 


Virtual or real address of CCW associated with this CCB 
depending on byte 6: 

Real address if byte 6= X'2u',X'6u',or X'8u' ; 
Virtual address if byte 6= X'Ou', or X'4u'. 


12 Reserved for 
Physical IOCS 


X'80' CCB being used by ERP 

X'40 1 Channel Appendage Routine present 

X'20' Sense Information desired (Note 10) 

X'10' Message writer 

X'08' EU Tape Error 

X'04 ! OLTEP Appendage available 

X'02' Tape ERP Read Opposite Recovery 

X'OT Seek Separation 


13-15 CCW Address in 
CSW 


Virtual Address of CCW pointed to by CSW at Channel 
End (if byte 6= X'8u', it is the real address) or address 
of the Channel End Appendage Routine for TP devices, 
VSAM or POWER. 


16-23 Optional Sense 
CCW 


8 bytes appended to the CCB when Sense Information is 
desired. 



COMMAND CONTROL BLOCK (CCB) (. . . .Cont'd) 

Note 1: Bytes 4 and 5 contain the status bytes of the Channel Status Word(Bits 32-47). 
If byte 2,bit 5 is on and device end results as a separate interrupt, device end 
will be OR-ed into CCB byte 4. 

Note 2: Indicates/* or/& statement on SYSRDR or SYSIPT. 
Byte 4, bit 7 (unit exception) is also on. 

Note 3: DASD data checks on count not returned. 

Note 4: For 1255/1259/1270/1275/1419,disengage. For 1275/1419D, I/O Error is 
external interrupt routine (Channel data check or bus-out check). 

Note 5: The traffic bit (Byte 2, bit 0) is normally set on at channel end to signify that 
the I/O was completed. If byte 2, bit 5 has been set on, the traffic bit and 
bits 2 and 6 in byte 3 will be set on at device end. Also see Note 1 . 

Note 6: 1018 ERP does not support the Error Correction Function. 

Note 7: This error occurs as an equipment check, data check or FCB parity check. 
For 2245, this error occurs as a data check or FCB parity check. 

Note 8: For 3504,3505,3525 input or output files using ERROPT, byte 3-bit 3 is set 
on if a permanent error occurs. Byte 2-bit 6 is set on to allow you to accept 
permanent errors. 

Note 9: SYSnnn= 255-(Number of partitions x 14). 

Note 10: If user Error Routine is specified and the user needs the sense info to further 
process the error, byte 12-bit 2 must also be set. Otherwise the 
supervisor error routine will mask off the status on return and the sense info is 
not available. 

Note ll:Byte 8, Buffer Offset : This is not used in EBCDIC files, and must than contain 
Hex or 80, the latter indicating that double-CCW support for an IBM 2501 
Card Reader is active. 



EVENT CONTROL BLOCK (ECB) 



Reserved 


Reserved 






Reserved 


1 


2 3 


1 









X'80' : Normal termination of subtask 
X'CO 1 : Abnormal termination of subtask 



RESOURCE CONTROL BLOCK (RCB) 





Reserved 




ECB Address 



Byte : X'FF" if resource is in use, X'OO' if resource is not in use 

Bytes 1-3 : Reserved 

Byte 4 : Bit 0= 1 Another task waiting for the resource 

= No other task waiting for the resource 

Bytes 5-7 : ECB address of current resource owner 



DENSITY DATA 



Density 
(Bytes per inch) 


Parity 


Convert 
Feature 


Translate 


SS Code * 


200 


odd 


on 


off 


10 


200 


odd 


off 


off 


30 


200 


odd 


off 


on 


38 


200 


even 


off 


off 


20 


200 


even 


off 


on 


28 


556 


odd 


on 


off 


50 


556 


odd 


off 


off 


70 


556 


odd 


off 


on 


78 


556 


even 


off 


off 


60 


556 


even 


off 


on 


68 


800 


odd 


on 


off 


90 


800 


odd 


off 


off 


B0 


800 


odd 


off 


on 


B8 


800 


even 


off 


off 


A0 


800 


even 


off 


on 


AS 


800 


dual density nine-track 




C8 


1600 






CO 
DO 


6250 


dual density nine-track 




800 


single density nine-track — 




CO 


1600 


single density nine-track — 




CO 


6250 


single density nine-track — 




DO 



* Refer to PUB Table, byte 5 



SYSTEM CONTROL PROGRAM COMMUNICATION REGION (SYSCOM) 
SYSCOM 



2& 







4 
4 


8 
8 


OA 
10 


OC 
12 


10 
16 


14 
20 


18 
24 


Address of 
Error Block 


Address of 
Attention Exit 


Address of 

Operator 

Option 

Cancel Exit 


Address of 

Operator 

Request 

Cancel Exit 


Address of 
SYSRES PUB 


Address of 
Fetch Routine 


Address of 
I/O Interr. Routine 


Address of 
Ext. Interr. Routine 


xxxx 


xxxx 


XX 


XX 


xxxx 


.wax , , 


xxxx 


xxxx 







1C 

28 


20 
32 


24 
36 


25 
37 


28 
40 


2A 

42 


2C 
44 


2E 
46 


2F 
47 


30 
48 


< c 

k 1 

8 

1 
a 


Address of 

Logical Transient 

Area 


Address of 

1st byte of 

Problem Program 

Area 


Free 

List 

Pointer 


Address 

of 
Channel 
Queue 


Number of 
Channel 
Queue 
Entries 


Length of 
One Error 

Queue 

Entry 


Number of 
Partitions 


Not used 


Flag Byte 

(see expansion) 


Address of 
Channel Buckets 


xxxx 


xxxx 


X 


XXX 


XX 


XX 


XX 


X 


X 


xxxx 



34 
52 


35 
53 


38 
56 


3C 
60 


40 
64 


44 
68 


46 
70 


48 
72 


4C 
76 


Configuration 

Byte 

(see expansion) 


Address of 
CRT Table 


Address of 
SAB Table 


Address of 

Channel Control 

Table 


F lags and 

Switches 

(See expansion ) 


System Task 

Selection 

Control Field 


Address of 

Task 
Selection 


Address of 
PD Area 


TH 

Free 

List 

Pointer 


X 


x*x 


xxxx 


xxxx 


xxxx 


XX 


XX 


XXXX 


x 



* See end of tables for further explanation 

Note : The address of SYSCOM can be found at fixed location X'8 



SYSTEM CONTROL PROGRAM COMMUNICATION REGION (. . . .Cont'd) 



4D 
77 


50 
80 


54 
84 


58 
88 


5A 
90 


5C 
92 


60 
96 


64 
100 


68 
104 


Address 

of 
TH Table 


Address of 

Timer Request 

Table 


Address of 
AB Table 


Key of Task 

owning LTA 

(UK) 


Key of Task 
running 
(TIK) 


Address of 
POWER/ VS 
partition 


Address of 

VTAM Address 

Vector Table 


Address of 
RF Table 


Address of 
EU ECB Table 


XXX 


xxxx 


xxxx 


XX 


XX 


XXXX 


xxxx 


xxxx 


xxxx 



6C 
108 


70 
112 


74 
116 


78 
120 


7C 
124 


80 
128 


84 
132 


88 
136 


Address of 
OLTEP bucket 


Address of 

RAS Linkage 

Area 


Address of 

ASCII 

Translate Table 


Address of 

PUB Ownership 

Table 


Address of 
Job Accounting 
Common Table 


Base Address of 

Page Management 

Routine 


Base Address of 
Channel Program 
Translation Routine 


Address of 

SDAID 
Save Area 


xxxx 


xxxx 


xxxx 


xxxx 


xxxx 


xxxx 


xxxx 


xxxx 



8C 
140 


90 
144 


94 
148 


98 
152 


9C 
156 


A0 
160 


Al 
161 


A2 
162 


A3 
163 


Address of 
Line Mode Table 


Address of VSAM 
Communication 


Address of PTA 


Address of first 
System Task Block 


Address of Task 

Block of Active 

System Task 


1 byte for 
Alignment 


Pointer to 
SENSE Task 
Block 


Pointer to 
Disk ERP 
Task Block 


Pointer to 

RAS 
Task Block 


xxxx 


xxxx 


xxxx 


xxxx 


xxxx 


x 


x 


x 


X 



SYSTEM CONTROL PROGRAM COMMUNICATION REGION (. . . .Cont'd) 



A4 
164 


A5 
165 


A6 
166 


A7 
167 


A8 
168 


A9 
169 


AA 
170 


AB 
171 


AC 
172 


AF 
175 


BO 
176 


Pointer to 

PMGR 
Task Block 


Reserved 


Pointer to 
PAGEIN 
Task Block 


Pointer to 

FETCH 
Task Block 


Reserved 


Pointer to 

CRT 
Task Block 


Pointer to 

ASYN 
Task Block 


Pointer to 

ERP 
Task Block 


Reserved 


Pointer to 

SVF 
Task Block 


Address of 
Task Timer 
Table 


X 


X 


X 


X 


X 


X 


X 


X 


XXX 


X 


XXXX 



B4 
180 


B8 
184 


BC 
188 


BE 
190 


CO 
192 


CB 
203 


CC 
204 


CE 
206 


DO 
208 


Address of 
MVCFLD 


TRTMSK 
pointer 


TP Balan- 
cing 
Parameter 


Key of 
partition 
owning 
Task Times 


Repositioning Information 
for MFCM ERP 


Number of 

Error Queue 

Entries 


Length of 
PUB Table 
in bytes 


Number of 
Partitions 


Address of 
Segment Table 


XXXX 


XXXX 


XX 


XX 


XXXXXXXXXXX 


X 


XX 


XX 


XXXX 



D4 
212 


D8 
216 


DC 
220 


E0 
224 


E4 
228 


E8 
232 


EC 
236 


F0 
240 


Address of 
Page Frame Table 


Address of 

Page Frame Table 

Extension 


Address of 
Boundary Box 


Address of 
DPD Table 


Reserved 


Address of 
VIRTAD Routine 


Address of 
End of Real Storage 


Address of 
Fetch Table 


XXXX 


XXXX 


XXXX 


XXXX 


XXXX 


XXXX 


XXXX 


XXXX 



SYSTEM CONTROL PROGRAM COMMUNICATION REGION (. . . .Cbnt'd) 



F4 
244 


F5 
245 


F8 
248 


FC 
252 


100 
256 


104 
260 


SVA Flag 
(see expansion) t 


Address of 
SVA 


Address of 
System GETVIS 


Address of 

RPS 

local directory list 


Address of 

RPS sector 

calculation routine 


Address of 
System Code 
patcharea start address 


x 


XXX 


XXXX 


XXXX 


XXXX 


XXXX 



See end of tables for further explanatic 



SYSTEM CONTROL PROGRAM COMMUNICATION REGION (. . .Cont'd) 



Expansion of SYSCOM Flag Bytes 



Byte 
Dec Hex 


Description 


64 


40 


Reserved for RMS in Model 115 and 125 

X'80' RMSR for channel attached devices, tapes and TP devices 
X'40' Full RMS support (MCAR/CCH and RMSR) 
X'20' MCAR/CCH support 


65 


41 


X'80' Initial selection of ERP 

X'40' Reserved 

X'20' Timer interrupt pending 

X'10' MICR Stacker-select active 

X'08' Invalid address during fetch 

X'04' SIO routine entered after interrupt 

X'02' TP in progress 

X'OT IP L in progress 


66 


42 


X'80' Initial RAS request 

X'40' RAS WAIT request outstanding 

X'20" RAS IPL in progress 

X'10' Reserved 

X'08' POWER/VS supported 

X'04' POWER/VS initialized 

X'02' GETREAL for SDAID or PDAID in progress 

X'01 ' Fetch for system task in progress (used by PDAID's) 


67 


43 


X'80' Reserved 

X'40' ECPREAL supported 

X'20' VSAM supported 

X'10" Reserved 

X'08' XECB support generated 

X'04' TP Balancing reset request 

X'02' Batch deactivated 

X'OT Reserved 


244 


F4 


SVAFlag 

X'80' Do not test for warm start copy of SVA 

X'40' SDL active 

X'20' No "Set SVA" or "Set SDL" allowed 

X'10' Build of DSL in progress 

X'08' SDL overflow 

X'04' Reserved 

X'02' Reserved 

X'OT Reserved 


252 


FG 


X'00000000- RPS not initialized 
XtlOXXXXXX' Pointer to RPS LDC in SVA 


256 


100 


XX10000000- No RPS support 

X'OOXXXXXX' Pointer to Sector Calculation Routine 



SYSTEM CONTROL PROGRAM COMMUNICATION REGION (....Cont'd) 
LAYOUT OF SYSTEM TASK SELECTION CONTROL FIELD 



Byte 
Dec Hex 


Description 


68 44 


Always zero 


69 45 


SELECT byte : 




X'OO' No system task active 
X'OI ' SNS active 
X'02' DSK active 
X'03' RAS active 
X'04' PMGR active 
X'06' PGIN active 
X'07' SUP active 




X'09' CRT active 
X'OB' ERP active 
X'OF' SVT active 



Note: The address of SYSCOM can be found at fixed location X'80'- X*83'. 



LAYOUT OF FLAG BYTE 



Byte 
Dec Hex 



X'01' APRT support generated 



LAYOUT OF CONFIGURATION BYTE 



Description 



Configuration Byte 

X ' 06 ' Support for 3277 generated 
X'02' Support for 125D generated 
X'OO' Support for 3210/3215 generated 



PARTITION COMMUNICATION REGION 



AS 







8 
8 


OA 
10 


OC 
12 


17 
23 


18 
24 


20 
32 


24 
36 


28 
40 


2C 
44 


Date 


Address of 
PPBEG 


Address of 
EOSSP 


Problem Program Use 


UPSI 
Byte 


Job Name 


Highest 

Storage 

Address of 

the Partition 


End Address of 

Last Phase 

Fetched or loaded 


Address of upper- 
most Byte of Phase 
with highest 
Ending Address 


Label 
Area 
Length 


xxxxxxxx 


XX 


XX 


XXXXXXXXXXX 


* 


XXXXXXXX 


XXXX 


XXXX 


XXXX 


XX 







2E 
46 


30 

48 


34 
52 


35 
53 




36 
54 


37 
55 




38 
56 


39 
57 


3A 
58 


3B 
59 


3C 
60 


3E 
62 


1 

t 

jg 
"e 

.s 


PIK 


End of 
Virtual 
Storage 
Address 


Machine 

Configur. 

Byte 


System 

Configur. 

Byte 1 


Standard 
Language 
Translator 
I/O Options 


Dump, Log, 

RELLDRand 

ASCII 

Options 


Job Control 
Byte 


Linkage 
Control 
Byte 


Language 

Translator 

Control 

Byte 


Job Duration 
Indicator Byte 


Disk Address 

of 
Label Cylinder 


Address 

of 
FOCL 




XX 


XXXX 


X 


X 


X 


X 


X 


X 


x 


X 


XX 


XX 














^ Job Control Switches ' 







40 
64 


42 
66 


44 
68 


46 
70 


48 
72 


4A 
74 


4C 
76 


4E 
78 


4F 
79 


58 
88 


5A 
90 


5C 
92 


Address 

of 
PUBTAB 


Address 

of 
FAVP 


Address 

of 
JIBTAB 


Address 

of 
TEBTAB 


Address 
of 
FICL 


Address 

of 

NICL 


Address 

of 
LUBTAB 


Line Count 

for 

SYSLST 


System Date 


LIOCS 
Comm. 
Byte;. 


Address of 1st 
Part of 
PIB Table 


ID Number of 

last Checkpoint 

or DASDFP 

Indicator 


XX 


XX 


XX 


XX 


XX 


XX 


XX 


x 


XXXXXXXXX 


XX 


XX 


XX 



Note: A communication region exists for each partition supported by the system 

The address of the communication region of the active partition is in fixed loc. X'14 1 - X'17* 



PARTITION COMMUNICATION REGION (....Cont'd) 



5E 
94 


60 
96 


62 
98 


64 
100 


66 
102 


68 
104 


6A 
106 


6C 
108 


6E 
110 


Job Zone 

in 
Minutes 


Address of Disk 
Information 
Block (DIB) 


Reserved 


Address of PC 
Option Table 
less 8 bytes 


Address of IT 
Option Table 
less 8 bytes 


Address of OC 
Option Table 
less 8 bytes 


Key of Program 

with 
Timer Support 


Reserved 


Logical 

Transient Key 

(LTK) 


XX 


XX 


XX 


XX 


XX 


XX 


XX 


XX 


XX 



70 
112 


74 
116 


78 
120 


7C 
124 


7E 
126 


80 
128 


84 
132 


86 
134 


87 
135 


Address of 
SYSPARM 


Address of 

J. A. Part it ion 

Table 


Address of 
TOD clock 
Common Area 


Address 
of 2d part 
of PIB Table 


Address 

of MICR DTF 

Table(PDTABB) 


Address 

of QTAM 

Vector Table 


Address 

of BG Comm. 

Region 


Option 
Indicator 


System Configuration 
Byte 2 and RMSR 
Open Flag Byte 


XXXX 


XXXX 


XXXX 


XX 


XX 


XXXX 


XX 


X 


X 



88 
136 


8C 
140 


8D 
141 


8E 
142 


8F 
143 


97 
151 


98 
152 


9F 
159 


Reserved for 
comparability 
reasons 


Standard Options 


Temporary 
Options 


Disk 
Configuration 


Catalog 
Procedure Name 


Switch for 
Catalog 
Procedure 


JCL 

Statement 

Name 


81 bytes 
SYSIN Indicator 


XXXX 


x 


x 


x 


xxxxxxxx 


x 


xxxxxxx 


x 



Note: A communication region exists from each partition supported by the system. 

The address of the communication region of the active partition is in fixed loc. X'\A'-X'U'. 



PARTITION COMMUNICATION REGION (...Cont'd) 



AO 
160 


A4 
164 


A5 
165 


Address of 
POWER/VS 
Partition 
Control Block 


POWER/VS 
Flag Byte 1 


POWER/VS 
Flag Byte 2 


xxxx 


x 


x 



Note: A communication region exists for each partition supported by the system 

The address of the communication region of the active partition is in fixed loc. X'14' - X'17' 



PARTITION COMMUNICATION REGION (....Cont'd) 
Key to Communication Region displacement 



MM/DD/YY or DD/MM/YY either set permanently by the job control date 
statement, or updated every time a GETIME macro is issued when time-of-day 
support is provided. Format controlled by BGCOMREG + 53. 
(System Configuration Byte, date convention bit 0) 



8 Address of the problem program area . 

10 Address of the beginning of the problem 

program area. Y(EOSSP) equals Y(PPBEG) 



Maintained for compatibility; 
correct value found in SYSCOM 
isplacement hex 20 



}Mainl 
correc 
at dis 



12 User area. If seek separation option is specified, bytes 12 and 13 are used at 

IPL time for the address of the seek address block. 

23 User program switch indicator. 

24 Job name set by the Job control program from information found in the 
fob statement. 

32 Address of the uppermost byte available to the problem program, that is either 

the address of the uppermost byte of the partition as determined during pro- 
cesssing of the ALLOC or ALLOCR macro or statement, or the end address of 
the area specified by the SIZE parameter in the EXEC statement. 

36 Address of the uppermost byte of the last phase of the problem program 

fetched or loaded . Not filled in when phase is in SVA . 

40 Highest ending main-storage address of all phases having the same 

first four characters as operand on the EXEC statement. 
For the phase $LNKEDT this field is not filled in. 
The address value may be incorrect if the program loads any of 
these phases above its link-edited origin address. If the EXEC 
statement has no operand, job control places in this location the 
ending address of the program just link-edited. 

44 Length of the problem program label area. 

46 Partition Identification Key (PIK). The low order byte identifies the active 

partition. Only significant for BG communication region. 

48 End address of virtual storage. 



PARTITION COMMUNICATION REGION (....Conrd) 
Expansion of COMREG Flag Bytes 



Byte 
Dec Hex 


Description 


52 34 


Machine Configuration Byte (Values set as supervisor generation time) 




X ' 80 ' Always set to indicate standard storage protect 




X*40' Decimal feature (always set) 




X'20' Floating point feature 




X'10' Physical transient overlap option 




X '08 ' Always set to indicate standard timer feature 




X'04' Channel switching device 




X'02 ' Burst mode on multiplex channel support 




X ' 01 ' Indicates MCH/CCH in system 


53 35 


System Configuration byte 




X ' 80' DDMMYY (Date convention bit set at generation 




time by STDJC) 




X * 40 ' Multiprogramming environment (2 or more partitions) 




X ' 20 ' DASD file-protect supported 




X' 10' DASD SYSIN - SYSOUT 




X'08' Teleprocessing 




X '04 ' Two or more partitions 




X 02 * Asynchronous processing 




X'01 * Track Hold 


54 36 


This byte contains the standard language translator I/O options 




(set by STDJC macro). 




X ' 80 ' DECK option output object modules on SYSPCH 




X'40' LIST option output source module listings and 




diagnostics on SYSLST 




X'20" LISTX option output hexadecimal object module- 




listings on SYSLST (compilers only) 




X ' 10' SYM option output symbol tables on SYSLST/SYSPCH 




X'08 XREF option output symbolic cross-reference list on 




SYSLST 




X'04 ' ERRS option output diagnostics on SYSLST (compilers 




only) 




X '02 ' CHARSET option input on SYSIPT is 48 or 60 character set 




X'02' Reserved 



PARTITION COMMUNICATION REGION (....Cont'd) 
Expansion of COMREG Flog Bytes 



Byte 
Dec Hex 


Description 


55 37 


This byte contains the standard supervisor options for abnormal EOJ, 




Relocating Loader and Control statement display and the indicator 




for the presence of the ASCII-EBCDIC and EBCDIC-ASCII trans- 




lation tables. 




X '80' Always on 




X'40' DUMP option 




(DUMPXYES OR 




DUMP=PART) 




X ' 20' yes, dump registers and storage on SYSLST partition in 




wait state, because a volume is to be mounted 




X'10' LOG option 




X*08 ' yes, list all control statements on SYSLST dummy, 




device search in progress; do not enter ERP 




X '04 ' Not used 




X'02' Relocating Load 




option yes, Relocating Loader supported 




X'OV ASCII option yes, ASCII supported 


56 38 


Job Control byte 




X ' 80 ' Job accounting Interface (JA) not supported 




XMO' Return to caller on LIOCS disk open failure 




X ' 20 ' Job control input from SYSRDR 




X'10' Job control output on SYSLOG 




X'08 ' Cancel job 




X ' 04 ' Pause at end-of-job step 




X ' 02 ' SYSLOG is not a console printer-keyboard or DOC 




X'OV SYSLOG is assigned to the same device as SYSLST 


57 39 


Linkage control byte 




X ' 80 ' SYSLN K open for output 




X'40' Update of Second Level Directory and RAS loadlist in 




progress (interface between SMAINDIR and Supervisor) 




X'20' Allow EXEC 




X'10' Catalog linkage editor output 




X'08 ' Supervisor has been updated 




X '04 ' PCIL open in progress 




X'02 ' Update of System Core Image Library in progress 




(interface between 5MAINDIR and Supervisor) 




X'01 ' Check automatic condens limits at end of job 




(interface between Librarian and Job Control) 



PARTITION COMMUNICATION REGION (....Cont'd) 
Expansion of COMREG Flog Bytes 



Byte 
Dec Hex 


Description 


59 3B 


Job duration indicator byte 




X'80' Within a job condition 




X'40' Dump or partition dump on an abnormal EOJ condition 




(see byte 141) 




X '20' Pause at EOJ step Set by attention routine for Job Control 




X'10' Job control output on SYSLST 




X '08 ' Job is being run out of sequence with a temporary assign- 




ment for SYSRDR 




X '04 ' PCIL is being condensed 




X ' 02 ' //DATE statement processed for current job 




X*01 ' Batch command just issued 


93 5D 


Used at IPL time and set by PIOGS 




X ' 80 ' 3330 file protection 




X'40* 3340 file protection 




X'20' 3350 file protection 


134 86 


Option Indicator byte 




X'80 


Reserved 




X'40 


= EU interface active 




X'20 


= Teleprocessing request 




X"IO 


= Supervisor support for tape 




X'08 


Reserved 




X'04 


= RETAIN support generated 




X'02 


= Linkage to Channel End Appendage Routine allowed 




X '01 ' = GETVIS function has been initiated 


135 87 


System Configuration byte 2 and RMSR Open Flag byte 




X'80' PCIL supported 




X'40' TOD clock supported 




X"20' PFIX macro supported 




X ' 10' Fetch $$BOPEN by $JOBCTLJ 




X-oS* Fetch $$BOPEN by $JOBCTLD 




X '04 ' Fetch $$BOPEN by $JOBCTU for WAITM 




X ' 02 ' Reserved 




X'OI ' RPS supported 



PARTITION COMMUNICATION REGION (....Cont'd) 
Exponsion of COMREG Flog Bytes 



Byte 
Dec Hex 



Standard Option byte 

X ' 80 ' = EDECK Standard Option 

X'40' = ALIGN Standard Option 

X ' 20 ' = PARTDUMP Standard Option 

X'10' = RLD Standard Option 

X'02* Reserved 

X'01 ' = ACANCEL Standard Option 

Temporary Option byte 

X'80' =EDECK Temporary Option 

XMO' =ALIGN Temporary Option 

X ' 20 ' =P ARTDUMP Temporary Option 

X'10' =RLD Temporary Option 

Not used (Bit 4 and 5) 

X '02 ' SUBLIB=DF Temporary Option 

X'01 ' 1=ACANCEL Temporary Option 

Disk Configuration Byte 

0-3 Not used 

X'08' 3350 supported 

X'04' 3340 supported 

X'02" 3330 supported 

X'01 ' Always 1: indicates 2311 and 2314/2319 supported. 

Interface byte for Catalogued Procedures 

X ' 80 ' Procedure being executed 

X'40' Overwrite processing 

X ' 20 ' Procedure with data 

X'10' Overwrite request for Job Control 

X ' 08 ' Insert request for Job Control 

X'04 1 Procedure end 

X'02' SYSLOG procedure 

X '01 ' Overwrite request for Supervisor 



SYSIN 81 bytes indicator 



SYSRDR 
SYSIPT 
SYSRDR 
SYSIPT 



X'80' Permanent 81 bytes 
X'40' Permanent 81 bytes 
X'20' Temporary 81 bytes 
X'lO' Temporary 81 bytes 

Not used 
X'01 ' Allow/& for MAINT CATALS 

POWER/VS Flag Byte 1 
X ' 30 ' POWER/VS Accounting Supported 
X'40' Partition under control of POWER/VS 
X'20' POWER/VS Partition 
Reserved 



POWER/VS Flag Byte 2 (Not 



*d) 



PARTITION IDENTIFICATION KEY (PIK) 



Task 

or 

Partition 


PIK value 




Number of partitions s 


jpported 




5 


4 


3 


2 


1 


Attention 


X'OO' 


X'OO" 


X'OO' 


X'OO' 


X'OO' 


BG 


X'10' 


X'10' 


X'10' 


X'10' 


X'10' 


F4 


X'20' 










F3 


X'30' 


X'20' 








F2 


X'40' 


X'30' 


X'20' 






Fl 


X'50' 


X'40' 


X'30' 


X'20' 





TASK INTERRUPT KEY (TIK) 



Task 


TIK value 


Number of partitions supported 


5 


4 


3 


2 


Attention 


X'OO' 


X'OO' 


X'OO' 


X'OO' 


BG 


X'10' 


X'10' 


X'10' 


X'10' 


F4 


X'20' 








F3 


X'30' 


X'20' 






F2 


X'40' 


X'30' 


X'20' 




Fl 


X'50' 


X'40' 


X'30' 


X'20' 


Subtask* 


X'60'-X'F0' 


X'50'-X'F0' 


X'40'-X'F0' 


X'SO'-XTO' 



*lfAP=YES 

LOGICAL TRANSIENT OWNER IDENTIFICATION KEY (UK) 

The halfword LIK at displacement 88 in SYSCOM contains the same value as the TIK 
when the Logical Transient Area (LTA) is in use and therefore identifies the owner of 
the LTA. When LTA is free, the halfword LIK contains zero's. The SVC2 routine sets 
the LIK, and the SVC 11 routine resets it to zero. If AP is not supported, the LIK con- 
tains zero's. 

LOGICAL TRANSIENT KEY (LTK) 

The halfword LTK at displacement 1 10 in each partition communication region has a 
zero value in the high-order byte and a key value in the low order byte. In a fore- 
ground communication region, the key value in the LTK is not significant. The LTK 
in the background communication region(BGCOMREG) has the same value as the PIK 
of the partition of the task that owns the LTA, or contains zero's when the LTA is free. 
The SVC2 routine sets the LTK, and the SVC 11 routine resets it to zero. 



RAS LINKAGE AREA 



I a 

~1 



RASLINK 






8 
8 


9 
9 


OA 
10 


OB 
11 


OC 
12 


10 
16 


14 
20 


18 
24 


1C 
28 


CPU ID Field 


Damaged 

Channel 
Byte 


RAS 
Flag Byte 


Machine 
Check 
Flags 


Largest CPU 
Model 


RAS Table 
(RASTAB) 
Address 


Base Address 
for RAS Monitor 


Address of 
Headqueue 
PUB Table 


Address of 
CCH Savearea 


Address of 
Page Queue 


XXXXXXXX 


X 


X 


X 


X 


XXXX 


XXXX 


XXXX 


XXXX 


XXXX 



g Key to RAS Linkage Area displacement 






CPU ID Field 






8 


Address of damaged channel, 


or X'FF' if no channel damaged 


9 


RAS Flag Byte 








bit 


ilSJL 


description 





1 
2 
3 
4 
5 
6 
7 


X'80' 
X'40' 
X'20' 
X'10' 
X'03' 
X'04' 
X'02' 

x'or 


RAS active 

RAS SIO flag 

RTA in control 

RAS I/O delayed 

Channel check on error SIO 

Reserved 

Channel check on SIO 

I/O active for SIO 



10 


Machine 


Check Flags 








bit 


flag 




description 




0-4 






Reserved 




5 


X'04' 




Hard machine check 




6 


X'02' 




All machine records built 




7 


X'OT 




All channel check 
records built 


11 


Largest CPU Model 






12 


Address of RAS MOni 


or Table (RASTAB) 


16 


Address used for base 


register 


n RAS Monitor Program 


20 


Address of Headqueue 


PUB Table 


24 


Address of CCH Savearea 




28 


, , Address of Pqqe Queu 


e Table 





Bytes 112-115 (X'70'-X'73') of the System Communication Region (SYSCOM) contain the address of the area. 
Label RASLINK indentifies the first byte of the area. 



SYSTEM TASK BLOCKS 











SNS BLOCK 


\ 




DSK BLOCK 


\ 
\ 




RAS BLOCK 






PMR BLOCK 






PGN BLOCK 


P 




SUP BLOCK 


o 
9- 




CRT BLOCK 






ERP BLOCK 






SVT BLOCK 


/ 



rs 5 



- Address of PIB Flag for System Task 
- Reserved 
Accounting ID 
7 



r-Job 
5 



I Address of System 
Task Save Area 



l_ 



PIK or TIK of Serviced User Task 



Notes: Bytes 152-155 (X'98'-X'9B') of the System Communication Region (SYSCOM) 
contain the address of the first System Task Block. 



PROGRAM INFORMATION BLOCK (PIB) - First port 
PIBTAB 



Attention PIB 



\\ s 








1 


2 3 


4 


5 6 7 


8 


9 10 11 


12 


13 


14 


15 




Flag 


Cancel 


SYSLOG 


always 


lnactive= zero 


Switch 


Address of save area 


X'07' 


BG 


Number 


Not 


i 


Byte 


Code 


ID 


zero 


Act ive= Address 


Byte 


or zero 


PIB 


user 


ofBG 


used 






(AR) 




of LTA save area 






assign 


LUB 


program 




g^ 


(See0) 








(Note 2) 


(See[F)) 


(Note 1) 
(Note 2) 


flag 
(See®) 


index 


LUB's 





Note 1: a) When LTA is inactive= LTA save area address 

b) When LTA is active for Problem Programs, this address is exchanged with that in the Problem Program PIB 

Note 2: When LTA is active for Logical Attention, bytes 9-1 1 are zero and bytes 5-7 contain the LTA save area address 
\ 1 2 3 4 5 6 7 8 9 10 11 12 13 14 



£1 



Flag 
Byte 

(See@) 



Cancel 
Code 



SYSLOG 
ID 



DAT 
flag 

(See®) 



Address of Problem 
Program save area or 
LTA save area 

(Note 3) 



Gate 
ID 



(See0) 



Address of system save 
area 



PIB 

assign 

flag 



User 
LUB 
index 



Number 

of 
Program 
LUB F 



$ [See[EJ) 



The number of Problem Program PIB's generated depends on the number of partitions specified during system generation. 

Subtask PIB's are generated only if AP= YES has been specified during system generation. 

The number of subtask PIB's generated depends on the number of partitions, it is 15 minus the number of partitions. For example, in a 

four partition system the number of subtask PIB's generated is 1 1 . 

Bytes 90-91 (X*5A' -X*58*) of the partition communication region(s) contain the address of the first part of the PIB table. Label PIBTAB 
identifies the first byte of the table. 



PROGRAM INFORMATION BLOCK (PIB) - First Part (. . .Cont'd) 



("a] FLAG BYTE (First byte in PIB) 

Flags which are always used: 

X ' 71 ' = Program is waiting for SVC58 

X' 73 '= Program is waiting because system is seized 

X ' 75 ' = Program is waiting for copy block 

X'77'= Program is waiting for TFREE 

X '79 * = Program is waiting for channel queue entry 

X '7B' = Program is waiting for CCW translation 

X ' 7F ' = Program is waiting for XECB table 

X' 80* = Program is not active 

X' 81 ' = Program is SVC2-bound (waiting for the LTA to be reteased) 

X*82 ' = Program is SVC7-bound (watting for an I/O interruption) 

X ' 83 ' = Program is ready to run 

X*85 ' = Program is SVC5-bound (waiting for the PTA to be released) 

X • 86 ' = Initial selection of RAS (used only for RAS PIB flag) 

X' 87 * = Program is set to common-bound condition 

Flags used only under certain conditions: 

Flags with partition-dependent values: 

The table below shows the various possible values of these flags and the 
partition to which a given value refers, depending on the number of 
partitions. The meanings of the flags types A, B, C, and D are explained 
below the table. 



I I Flag I I I Partition referenced 

j __ 4U 

II NPARTS = 

A ' B ' C i I 



|__m_ u d_- v. _| I I 2_ 3_ 4 5 J 

I X , 29'\X , 3D'\x , AB , \x'59 , ~\ [~ BG BG BG BG j 

I X'2B' X^F'jXMD' X'5B' Fl F2 F3 F4 ' 

|x'2D' X'4ViX'4F' X'5D' Fl F2 F3 

X'2F' X'43' X'51' X'5F' Fl F2 

L x ^li x i 4 iL x l 5 iL x L 6 LiJ - F1 J 

Flag A is used only if AP=YES and VSAM=YES. The codes are used to 
gate the CDLOAD routine for tasks running in one partition. 

Flag B is used only if AP=YES and GETVIS=YES. The codes are used to 
gate the GETVIS routine for tasks running in one partition. 

Flag C is used only if AP=YES and PFIX=YES. The codes are used by 
the PFIX routine to set a partition PFIX-bound. 

Flag D is used only if PARTS 1 . The codes are used by the load 
leveller to deactivate a partition. 

Flags with partition-independent values: 

The following flags are used only if NPARTS 1 : 
X'6A'= Program is SVC35-bound ^ . f TRKHLD=n 

X 6B '= Program is SVC35-bound ' 

X ' 6D '= Program is waiting for the next freed page frame. 



PROGRAM INFORMATION BLOCK (PIB) - FirsrPort (....Cont'd) 



[A] Flog Byte (Cont'd) 

The following flags are used only if AP=YES: 
X*67' = Program is SVC38-bound 
X*69' = Program is SVC41/42-bound 

The following flag is used only if CBF=n: 

XVD* = Program is waiting for free console buffer table entry 

The following flag is used only if TP=QTAM: 
X-8B' = Task in QTAM wait 

The following flag is used only if IDRA=YES or DOC=125D/3277: 
X*6F' = Program is IDRA-bound 

The flags X'37', X*39', and X'3B'are used if TP=VIAM to gate the 
SVC53 routine. 

Explanation of the contents of an entry in the PIB 



00 PIB DAT Flag 

X'Ol' = Return to re-entrant supervisor routine 

X'02' = Return to gated supervisor routine 

X'04' =Move CCB at dispatching time 

X'08' = Service delayed external interrupt 

X'10' = Deactivation for this task is being delayed 

X'20' = Operator communications to be serviced 

X'4G" = Task has seized the system 

X'80 1 = Program is running in virtual mode 

fc| Gate Identifier 

X'71' = Gating of SVC58 required 
X'53' = Gating of SVC41/42 required 



i DAT Flag is X'03', that is, the first two 



The flags are only used if the P 
flags are on (See QD ). 

[5] PIB Assign Flog 

X'80' = SYSRES DASD file protect inhibited (allow write operation on SYSRES) 

X'4G" = Channel appendage exit allowed (BTAM) 

X'20 1 = Cancel in progress (used in terminator function) 

X'10' = Cancel control (set on a foreground cancel) 

X'08 1 = Hold foreground assignments 

X'07' = Attention PIB 

[I] Problem Program PIB Flog (Last byte in PIB) 

1= Batched fob in foreground (has no function in DOS/VS) 

1= Cancel in LTA and device not assigned 

l = /&onSYSINif DASD 

1= Partition in stopped state 

1 = Fetch EOJ monitor 

l=Task is canceled 

1= Subtask(s) attached 

1=in AB routine 



Bit 0: 


Bit 1: 


Bit 2: 


Bit 3: 


Bit 4: 


Bit 5: 


Bit 6: 


Bit 7: 



IV-31 



PROGRAM INFORMATION BLOCK (PIB) - First Part (....Cont'd) 



|f[ Attention PIB Switch Byte 



Bit 0: Reserved 

Bit 1: 1= Fetch Physical Attention Transient S5ABERRZ 

Bit 2: 1= Delay cancelation (fetch $$ABERZ1) 

Bit 3: 1= Emergency cancel request 

Bit 4: Reserved 

Bit 5: 1= Command available (DOC) 

Bit 6: 1= Fetch Logical Attention Routine ($$BATTNA) 

Bit 7: 1= External Interrupt request 



PROGRAM INFORMATION BLOCK EXTENSION - Second Part 



Address of corn- 
region 



System 
LUB index 



Interrupt 
Information 



(See table ® below) 



Address of termination ECB 
if any, otherwise zero's 



Program 
Interrupt 
Key(PIK) 



Flag 
Byte 

® 



Note 1: Always BG communication region in Attention- and Background PIB extension. Appropriate communication region 
in other PIB extensions when a multiprogram system has been generated. 

For each PIB Table entry (first part) an entry exists in the PIB Table Extension (second part). 

Bytes 124-125 (X'7C'-X'7D') of the partition communication region(s) contain the address of the PIB Table extension. 
Label PIB2TAB identifies the first byte of the PIB Table extension. 



® 



Type of interruption 


Contents of PIB Extension Bytes 


4 


5 


6 I 7 


SVC 

PC 

I/O 


00 
00 
00 


ILC*) 
ILC*) 
00 


Interruption Code 
Interruption Code 
I/O Address 



*) ILC (Instruction Length Code) is in bits 5 and 6, other bits are zero's 



<D 



Byte 15 


Bits -1 


: Reserved 


Bit 2: 


l=Task owns CRT 


Bit 3: 


VSAM automatic Close in 




progress 


Bit 4: 


Not used 


Bit 5: 


1= SVC screening 


Bit 6: 


NOT used r interval set 


Bit 7: 


+ ECB - Task has issued 
SVC 92, 93 or 94. 



Layo ut of LTA ond Problem Pr ogram Save Area 



Note 1 


PSW 


Reg 9 


Reg A 


RegB 


RegC 


Reg D 


RegE 


RegF 


RegO 


Reg 1 


Reg 2 


Reg 3 


Reg 4 


Reg 5 


Reg 6 


Reg 7 


Reg 8 


Note 2 


FLTPT RO 


FLTPT R2 


FLTPT R4 


FLTPT R6 



Note 1 : Problem Program Save Area : Program Name 

Note 2: Problem Program Save Area: First half-word : Label area length 

Second half-word : Reserved 

Third and fourth half-word: Job start time 



LTA Save Area: 



L ayout of User Save Area (for AB, PC, OC and IT options) 



Interrupt Status 
Information * 


RegO 


Reg 1 


Reg 2 


Reg 3 


Reg 4 


Reg 5 


Reg 6 


Reg 7 


Reg 8 


Reg 9 


Reg A 


RegB 


RegC 


RegD 


Reg E 


RegF 



* Interrupt Status Information : 

Byte : Unused 

Byte 1 : Protection key and Mask (from PSW byte 1) 

Bytes 2-3 : Interruption Code 

Byte 4: Bits 0-1 : Instruction Length Code 

Bits 2-3 : Condition Code 
Bits 4-7 : Program Mask 

Bytes 5-7 : Instruction Address 



I/O TABLE INTERRELATIONSHIP 



BG 
Fn 



m= number of units 
i= index displacement 
within LUB table 



FICL LI 



W\ 



FAVP 



SOTi 



h> 



8-3 

PS 





n 




— 














Hi: 


;; 




























ml 








r" 


















[]:-- 


::—:: 





► TEBTAB (Option) 

[THTAB] 
^ SAB (Options) 

[lmt J 

used by PIOCS 
CHANQ 



3 

§ 
I 



LOGICAL UNIT BLOCK (LUB) TABLE 

Number in 
Clou List 
(NICL) LUBTAB 



Class List 
(FICL) 



BG 

System LUB's 



Programmer LUB's 



Fn 

System LUB's 



Programmer LUB's 



F2 

System LUB's 



F2 

Programmer LUB's 

Fl 

System LUB's 



Fl 

Programmer LUB's 



LUB Table for any Partitic 



SYSRDR 

SYSIPT 

SYSPCH 

SYSLST 

SYSLOG 

SYSLNK 

SYSRES 

SYSSLB 

SYSRLB 

SYSUSE 

SYSREC 

SYSCLB 

SYSVIS 

SYSCAT 

SYS000 

SYS001 

SYS002 

SYS003 

SYS004 



2) SYSn 



00000000- Points to first PUB and PUBOWNER 

00000001- Points to second PUB and PUBOWNER 
00000010- Points to third PUB and PUBOWNER 



1 1 1 11 1 - Ignore, assigned ignore 
1 1 1 1 1 1 1 - Null Pointer, the LUB is unassigned 
When a logical unit is assigned, the system inserts a pointer 
to the PUB for the physical device specified. 



JFormatofanyLUB 



Byte 


Byte 1 


PUB Pointer 


JIB Pointer 



JIB Index (Multiply by 4 = Displacement into JIB Table) or 
X'FF' = Null Pointer,no JIB for this LUB. 

A LUB has a JIB pointer when: 

1. The logical unit is temporarily assigned 

2. The logical unit assignment is alternate (ALT). 

3. A DASD file (exept a system I/O file on disk) is 
opened (DASD file protect only) 



Bytes 76 and 77 (X'4C'-'4D') of the partition communication 
region contain the address of the LUB table. 
Label LUBTAB identifies the first byte of the table. 

Notes; 

1) SYSUSE may be called SYSCTL in error recovery messages. 

2) The value that may be specified for the highest programmer 
logical unit in the system is: SYS241 if NPARTS= 1, SYS226 if NPARTS=2, 
<VS212 if NPARTS*3, SYS198 if NPARTS=4, or SYS184 if NPARTS=5. 



PHYSICAL UNIT BLOCK (PUB) TABLE 



[-FFJ PUB-t, 
l — ' delimi 

L-PUBEND 



Job Control Flags 

Channel Scheduler Flags — 

Device Type 

TEB Pointer/Retry Counter 
Unit 1 



£ 



T_ 



Channel Queue Pointer 
— Channel 

Device Characteristic Codel 
or SAB Pointer J 



ByteO: 
Byte 1: 



Channel number. (Hex 0-6, FF= NULL) 
I/O device unit number 



Byte 2: Hex 0, 1,2, points to the first channel queue entry for this device 

Byte 3: If device is a 2495 Tape Cartridge Reader and TEB's are specified, this 

byte is a TEB pointer. (Hex 1, 2, 3, ). Otherwise this byte is a retry counter. 

Byte 4: Section 2 for device type codes. 

Byte 5: SS of the MODE= parameter in the DVCGEN macro for tape unit. (See 

Section 2) 

For an ICA line Model 115 or 125, this byte contains the displacement 

index of the entry in the Line Mode Table (LMT). The address of the 

LMTisin SYSCOM. 

For DASD with seek separation, this byte is used as the SAB Pointer. 
With Track Hold but not seek separation supported, this byte contains 
a pointer to the Track Hold Table entry or X'FF* (with both SKSEP and 
TRKHLD specified, the track hold pointer is found in the SAB entry). 

For MICR type devices, this byte indicates which external interrupt line 



For a 3704/3705 Communications Controller, this byte contains the 
type number of the Channel Adapter 

For 2560 or 5425 : 

Bit 0: 1= Repositioning required 

1: 0= SYSPCH temporarily assigned to hopper 1 

1= SYSPCH temporarily assigned to hopper 2 
2: 0= SYSIPT temporarily assigned to hopper 1 

1= SYSIPT temporarily assigned to hopper 2 
3: 0= SYSRDR temporarily assigned to hopper 1 

1= SYSRDR temporarily assigned to hopper 2 

5: 0= SYSPCH permanently assigned to hopper I 
1= SYSPCH permanently assigned to hopper 2 



PHYSICAL UNIT BLOCK TABLE (. . . .Cont'd) 



Byte 5: Bit 6: 0= SYSIPT permanently assigned to hopper 1 

(Cont'd) 1= SYSIPT permanently assigned to hopper 2 

7: 0= SYSRDR permanently assigned to hopper 1 

1= SYSRDR permanently assigned to hopper 2 

Byte 6: Channel Scheduler Flags 

Bit 0: 1= Device busy 

I: 1= Switchable device 

2: Reserved 

3: 1 = I/O error queued for recovery 

4: 1= Operator intervention required 

5: 1= Device End posting required 

6: 1= Burst or overrunnable device 

7: l=7-track tape unit 

Byte 7: Job Control Flags 

Bit 0-4: Standard MODE assignment for 7-track tape (all ones 
if not tape, all zero's if device is down) 

5: 1= Device supports RPS 
6-7: B' II ' (both on)= Headqueue in progress 
B'01' = Headqueue requested 

Notes: A null is generated for each device to be supported by the supervisor. 

Standard physical unit assignments are made to the PUB table at 
supervisor generation time. 
PUB's are ordered by channel and priority within a channel. 

An entry in the PUB Ownership Table is associated with each entry 
in the PUB Table, if the supervisor has been generated to support 
mu Itiprogramming . 

Bytes 64 and 65 (X'40'-'4r) of the partition communication region 
contain the address of the PUB Table entry. Label PUBTAB identifies 
the first byte of the table. 



PHYSICAL UNIT BLOCK OWNERSHIP TABLE 



Byte 0: Bit 0: 1= Volume is owned by VTAM 

Bit 1 : 1= waiting for volume to be mounted 
Bit 2-7: Reserved 



Byte 1: 



Identifies the partition that owns the PUB according to following table: 



Flag 


Partition c 


wning PUB if number of partitions is: 


2 


3 


4 


5 


X'OT 


BG 


BG 


BG 


BG 


X'02' 


F 1 


F2 


F3 


F4 


X'04' 




F 1 


F2 


F 3 


X*08' 






F 1 


F2 


X'10' 








F 1 


X*80' 


PUB owne 


d by VTAM 





The number of entries in the PUB Ownership table is equal to the number 
of entries in the PUB table. Associated with each PU3 entry is an entry 
in the PUB Ownership table. 

Bytes 120-123 (X'78'-'7b') of the system communications region(SYSCOM) 
contain the address of the PUB Ownership fable. 
Label PUBOWNER identifies the first byte of the table. 



HEADQUEUE PUB TABLE 



HQPUBTAB 








LOG 


\ 






RAS 








CRT 


"< 






PMR 








ERP 






/ 




/ 


SUP 


y 







Pointer to system] 
task's PIB flag j 

Pointer to original PUB 



■h 



copied PUB 







78 9 10 11 



The Headqueue Table has a maximum of 6 entries (for RAS, CRT, ERP, PMR and 

SUPV system tasks). The entries for the RAS and CRT tasks are not generated 

when these functions are not supported. The LOG headqueue entry is only generated 

for models 115 and 125. 

The order of the entries determines the headqueueing priority of the system tasks. 



Bytes 20-23 (X'U'-X'l?') of the RASLINK area contain the address of the 

Headqueue PUB Table. 

Label HQPUBTAB identifies the first byte of the table. 



JOB INFORMATION BLOCK (JIB) TABLE 




JIBTAB 


a \ 

i * 2, / 




















•S ~ 







1 


2 


3 


|| . 






1 i 






s " 







Byte(s) 


Description 


0-1 (Contents 
depends on the bit 
setting in byte 2) 


Bit setting 
Byte 2 


Contents 


Bit 0= 1 
Stored standard 
assignment 


LUB entry of stored standard assignment. 
(PUB and JIB pointer) 


Bit 1= 1 

Alternate 

assignment 


Byte : PUB pointer 
Byte 1 : X'00' 


Bit 2= 1 
2311/2314/ 
2319 Extent 


Byte : Cylinder lower limit 
Byte 1 : Cylinder upper limit 

*) Note 1 


Bit 3= 1 
2321/3330/ 
3340/3350 
Extent 


For 2321 : 

Lower limit (Cell or combined 
subcell and strip) or 

Upper limit (Cell or combined 
subcell and strip) 






For 3330 / 3340 / 3350 

Cylinder lower limit or 






Cylinder upper limit (One cy- 
linder number uses two bytes) 

*) Note 1 

*) Note 2 


2 


Meaning if bit = 1 : 

Bit : Stored standard assignment 

Bit 1 : Alternate assignment 

Bit 2: 231 1/2314/2319 extent 

Bit 3 : 2321/3330/3340/3350 extent 

Bit 4 : The alternate assignment indicated in bit 1 is perma- 
nent. This bit is also on when one of the extent indi- 
cators (b' r 2 and bit 3) is on. 

Bit 5 : Catalogued procedures processing 

Bit 6/7: Reserved 



JOB INFORMATION BLOCK (JIB) TABLE (. . . .Cont'd) 



Byte(s) 


Description 


3 


Chain byte 

Contains the displacement index of the next JIB. 

X'FF' defines the end of the chain. 



* Note 1 : Only when file-protect on DASD. 

* Note 2 : Two JIB's are required for a 2321/3330/3340/3350 extent; one for lower 

limit and one for upper limit. 

The lower limit defining JIB must be chained to the upper 

limit defining JIB. 

For 2321, byte 1 of this type JIB contains the subcell number 

times 10 plus the strip number in binary. 

Bytes 68-69 (X'44'-'45') of the partition communication region contain the 
address of the JIB table entry. Label JIBTAB identifies the first byte of the 
table. 



CHANNEL QUEUE TABLE 







CHANQ 






3,H 

?. 5" J 












\ LUB D 










n 














l_l 




* Requestor Identification 


— , 










\ ! Chain byte 






PUB ** 

n 




„ * 


i— CCB address 











1 


2 


3 


4 


5 


6 


7 






i i 










t y >. M „«u= 






/ 






/ 



Byte 0: Contains the displacement within the channel queue of the next entry in 

the free list or in the list for a specific device, or X'FF' when it is the 
last entry in the free list or a device list. 

Bytes 1-3: Contains the CCB address for the specified device. , 

Byte 4: Contains a code identifying the task making the I/O request .This one 

byte entry indicates to which task the CCB belongs, and is in the form 
X'nk' where: 

n= user storage protection key. (Attention or system task= 0,BG task= 1, 
FG tasks=2-5 depending on the number of partitions). 
k=0 for Attention and all user tasks. 
1 for SNS 



nK=FF for any unused channel queue entries. 



2 for DSK 

3 for RAS 

4 for PMGR 

6 for PAGEIN 

7 for SUPVR 
9 for CRT 

B for ERP 
F for SVT 

Byte 5: Contains pointer(displacement index) to the entire LUB table identifying 

the logical unit making the I/O request. This is doubled to get the actual 
displacement into the full LUB table. 

Byte 6: Contains X'FF' if the LUB is a programmer class, or the displacement 

within the partition LUB if it is a system class. 
(Not used by a non MPS Supervisor). 

Byte 7: Contains the displacement within the PIB table of the PIB of the task re- 

questing I/O, or X'FF' when the channel queue entry is in the free list. 
(Not used by a non MPS Supervisor). 
* FLPTR: The free list pointer contains the index wilhin the channel queue 

of the first entry in the free list or X'FF' when the channel queue is full. 
Byte 36 (X'24 1 ) of the System Communication Region (SYSCOM) contains 
the Free List Pointer. Label FLPTR identifies the location of the pointer (1 byle) 

** PUB byte 2: The PUB channel queue pointer contains the index within the 

channel queue of the first entry for a specific device. 
Bytes 37-39 (X'25 , -X , 27') of the System Communication Region (SYSCOM) 
contain the address of the Channel Queue fable entry. Label CHANQ 
identifies the first byte of the (able. 
IV-43 



CHANNEL BUCKETS 



Address of first 
PUB on Channel 



CCB Pointer 
(RD 



Device Address 
(R2) 



PUB Pointer 
(R3) 



Channel Queue 
Pointer 
(R4) 



PIB Pointer 
(R5) 



A channel bucket contains information related to the last I/O started on the channel. 

The number of channel buckets in a system equals the number of I/O channels in the system. 

Bytes 48-51 (X'30 , -X'33') of the System Communication Region (SYSCOM) contain the 

address of the Channel Buckets. 

Label REGSAV identifies the first byte of the table. 



CROSS PARTITION ECB (XECB) TABLE 











XECB name 


Access 
code 


XECB 
address 


Task ID 
of owner 


Task ID 
of waiter/ 
poster 


7 8 9 


11 12 13 14 15 


Byte 8 




Porameterlist for TYPE = DEFINE 




Bytes 0-7: 
Byte 8: 


XECB name 

X'On", bits 4-7 contain the access c 


ode 



Porameterlist for TYPE = DELETE or DELETALL or RESET or CHECK 



Bytes 
Bytes 



XECB name 
X 'lOOO' TYPE = RESET 
X'4000' TYPE = DELETE 
X'4 800' TYPE = DELETALL 
X'8000' TYPE = CHECK 



CHANNEL CONTROL TABLE 



Channel 




Channel 1 




Channel 2 




Channel 3 




Channel 4 


/ 


Channel 5 


/ 
/ 
/ 


Channel 6 


/ 
/ 
/ 



Byte 0: X'20'= Block Multiplexer Channel 

X' 10'= Byte Multiplexer Channel 

X' 1 1 '= Byte Multiplexer Channel with burst mode support 
X' 13'= Byte Multiplexer Channel running in burst mode 
X'00'= Selector Channel 
X'80'= Channel not operational or not present in the system 

Byte 1: Always zero 

te: Byte 60-63 (X'3C'-'&') of the system communications region(SYSCOM) 

contain the address of the Channel Control Table. 
Label CHNTAB identifies the first byte of this table. 



TRACK HOLD (THTAB) TABLE 
THTAB 



THFLPTR*) 

-•3 2 
» 3 ^ 




\ 




f 


a5 




3 


3 3. 




I 








5" £ 









CCB Address 


Address of held track 
(BBCCHH) 







Key of task- 
Flag and Counter - 



Bytes 1-3: 
Bytes 4-9: 
Byfe 10. 
Byte 11: 



Initially, pointer to next sequential entry or X'FF'(table delimiter)in 
last entry. After requests have been issued, this byte points to the 
entry for the next request for a track on the same device, or contains 
X'FF' (in entry for the last request), or it is a pointer in the free list 
chain. 

Address of CCB associated woth the task requesting the hold. 
Disk address of the track being held (in the form BBCCHH). 
Key of the task owning the track. 



Bit 0=1: 
Bits 1-3: 
Bits 4-7 : 



Indicates a task is waiting for this track 

Unused 

Counter of number of holds on the track. (The number of 

holds is one more than this value). 

*) Note: THFLPTR: The track hold free list pointer (1 byte) contains the dis- 

placement within the Track Hold table of the first entry 
in the free list or X'FF' when the Track Hold table is full. 

Bytes 77-79 (XMD'-MF 1 ) of the system communication region (SYSCOM) contain the 
address of the Track Hold table. Label THTAB identifies the first byte of the table. 

Byte 76 (X'4C) of the System Communication Region (SYSCOM) contains the address 
of the Track Hold Free List Pointer. Label THFLPTR identifies the location of the pointer. 



TAPE ERROR BLOCK (TEB) TABLE 



TEB 1 


TEB2 


TEB 3 


TEB 4 


TEB 5 


TEB 6 



12 3 4 5 



i 5* 51 
8 g-S 
1 » c TEB 3 ^ q ^' Byte 0; Error recovery retry count. 

I §. 8- I I "< ,' Byte I: Permanent read data check 

error count. 
Byte 2: Number of times the read 
. .. _, data check error routine is 

1 "§ 5- / entered. 

~ " ™ ' ' Byte 3: Number of times the write 

data check error routine is 
entered. 
Byte 4: Write skip(erase gap) count. 
Byte 5: Noise record count. 

One TEB is generated for each 2495 Tape Cartridge Reader unit if the FOPT macro 
contains the TEB=n parameter. Job Control resets each TEB at normal or abnormal 
End-of-Job.An unused TEB contains HEX'FFOOOOOOOOOO'. A TEB is referenced from 
byte 3 of a Tape Cartridge Reader unit PUB. 

Bytes 70 and 71 (X'46'-'47') of the partition communications region(s) contain the 
address of the TEB Table entry. Label TEBTAB identifies the first byte of the table. 



CONSOLE BUFFERING TABLE 







ICBNEXTi 






K? 




(O » c ; 

3 § l 




Hi 

a a » 







CBCCW 



CBCCB 



CBDATA 



m 



§ * / Bytes 0- 7 CCW: 

•< ^ / Command code, chain byte, 

/ and count f i eld copied from 

t the user's CCW. The data 

' address is always the address 

,' of the data portion of the 
buffer entry. 



|CBNEXT| points to next buffer entry 



Bytes 8- 23 CCB: 

The CCB used by the console 
buffering routine; The CCW 
address is always the address 
of the CCW in the buffer entry. 

Bytes 24-103 DATA: 

Contains the data moved from 
the requestor's output area. 



Label CBTAB identifies the first byte of the Console Buffer. 



LINE MODE TABLE 



3 



1 { Maximi 

*~^ I I at syste 

« I I Actual 



The first 4 bytes of the table 

Maximum number of start/stop lines. Set by the IOTAB 
[macro at system generation 

[Maximum number of BSC lines. Set by the IOTAB macro 
fern generation 

number of start/stop lines. Determined by DVCGEN 
[macros at system generation and ADD commands at IPL 
[Actual number of BSC lines. Determined by DVCGEN macro 
t system generation and ADD commands at IPL 



%l 



Line Mode settings for 
Model 115/125 Comm. Adapter 



Bytes 140-143 (X^C-X^F 1 ) of the System Communication Region (SYSCOM) 

contain the address of the table. 

Label MODTAB identifies the first byte of the table. 



PAGE DATA SET TABLE (DPDTAB) 



Extent Information 


Number of 
Pages supported 


Volume ID 

for 

Page Data Set 


Address of 
Constant Table 

for 
Load Leveller 



Extent Information (Bytes 0-11) 



Bytes and 1 : 
Bytes 2 and 3 : 



Bytes 4 - 7: 
Bytes 8-11: 



Channel and Unit number of SYSVIS Device 

Internal device code of SYSVIS Device 
(offset in Page Manager Device Constants List) 
0= 2314 , 4= 3330 , 8=3340, C=3350 

Relative track address of Lower Limit 

Relative track address of Upper Limit 



Bytes 224-227 (X'E0'-X'E3') of the System Communication Region (SYSCOM) 

contain the address of the DPDTAB. 

Label DPDTAB identifies the first byte of the table. 



SEEK ADDRESS BLOCK (SAB) 
SAB 



2.P 

S.3 




n 




u 




s ?. 




I £_ 




1? 






Li 



p,. 






1 


2 


3 


4 


B 


C 


C 


H 


X'FF' 



Bytes 0-3 : Current Disk Address (BCCH) 

Byte 4 : X'FF' on Pointer to the Track Hold table entry 



A SAB table is only generated if Seek Separation has been specified at 
supervisor generation time. 

Bytes 56-59 (X^'-X^') of the System Communication Region 
(SYSCOM) contain the address of the SAB Table. 
Label SAB identifies the first byte of the table. 



DISK INFORMATION BLOCK (DIB) TABLE 



DSKPOSBG 


BGDIB 
Table 


DSKPOSFn 


FnDIB 
Table 






DSKPOSF2 


F2DIB 
Table 


DSKPOSF1 


Fl DIB 
Table 



The number of DIB tables depends 
on the number of partitions speci- 
fied at supervisor generation. 





Format of any DIB table if SYSFIL= 
6 7 


YES 
9 


10 












16 


17 


18 


19 


20 


21 


22 


23 




Current Address 


K D D 


End Address 


UL 


LL 


M 


RC 




SYSLNK 


C 


C 


H 


H 


00 


00 


00 


P 


P 


00 


00 


00 


00 


00 


00 


00 


00 


00 


00 


00 


00 


00 


00 


00 


SYSIN 


B 


B 


C 


C 


H 


H 


R 


00 


00 


50 


B 


B 


C 


C 


H 


H 


R 


H 


H 


XX 


XX 


XX 


00 


00 


SYSPCH 


B 


B 


C 


C 


H 


H 


R 


00 


00 


51 


B 


B 


C 


C 


H 


H 


R 


H 


H 


XX 


XX 


XX 


00 


00 


SYSLST 


B 


B 


C 


C 


H 


H 


R 


00 


00 


78 


B 


B 


C 


C 


H 


H 


R 


H 


H 


XX 


XX 


XX 


00 


00 


PRCDIB 


B 


B 


C 


C 


H 


H 


R 


00 


00 


50 


B 


B 


C 


C 


H 


H 


R 


H 


H 


XX 


XX 


XX 


00 


00 





Format of any DIB table if SYSFIL= 
6 7 


NC 


9 


10 




16 


17 


18 


19 


20 21 


22 23 




Current Address 


K D D 


End Address 


UL 


LL 


M 


RC 




SYSLNK 


C 


C 


H 


H 


00 


00 


00 


P 


P 


off 




PRCDIB 


B 


B 


C 


C 


H 


H 


R 


00 


00 


50 


B | B | C |C | H | H 


R 1 H 1 H |XX|XX|XX|00 1 00 



") BG SYSLNK DIB contains the PUB pointer for CLB. 
For FG SYSLNK DIB's this byte is unused. 





Format of 3540 D 
1° 


isket 


te DIB ta 
6 


ble 
7 




9 


10 












16 


17 


18 


19 


20 


21 


22 


23, 




Current Address 


K D D 


End Address 






M 


RC 




SYSIN 


00 


00 


00 


00 


C 


H 


R 


00 


00 


00 


FLG 


EXTHDR 
4* -tt 


00 


c 


H 


R 


00 


00 


XX 


00 


00 


00 


00 


SYSPCH 


00 


00 


00 


00 


C 


H 


R 


00 


00 


00 


FLG 


EXT HDR 
4* ■» 


00 


c 


H 


R 


00 


00 


XX 


00 


00 


00 


00 


SYSLST 


00 


00 


00 


00 


C 


H 


R 


00 


00 


00 FLG 


EXT 
4* 


V 


00 


c 


H 


R 


00 


00 


XX 


00 


00 


00 


00 



DISK INFORMATION BLOCK (DIB) TABLE (....Cont'd) 



Bytes - 6 : 



Bytes 7 - 9 : 



Current address 

Bytes - 5 : Current address of key: the next address 
to be used (both for input and output) . 
6 : Record number of current address . 

KDD 

Key and data length of the symbolic device. 
PP: starting cylinder of private core image 
library if POL is assigned; otherwise zero. 

End address 

Bytes 10-15: End address of key: the last address 
within the limits of the extent. 
1 6: Record number of end address . 
(if 3540, byte 10: flag byte 

X'80' = no more extents 
X'40' = last volume 
X'10' = continued volume 
byte 1 1 : extent number 
byte 12: HDR 1 number ) 



Byte 17 
Byte 18 
Byte 19 
Byte 20-21 



Byte 22 
Byte 23 



Upper head limit (3540 not used) 

Lower head limit (3540 not used) 

Maximum number of records per track . 

Record count: residual capacity for 
beginning of operator notification. 
Set at system generation time with 
SYSFIL parameter, or after IPL with 
SET statement (RCLST and/or RCPCH 
operands) . 

A warning message is issued by [ob con- 
trol after end-of-job step when the 
minimum number of remaining records 
has been reached or exceeded during 
the previous job (not supported for 3540) . 



X'40' Indicates RPS support 
Reserved 



Note: There is one DIB table for each partition. 

Label DSKPOSBG identifies the first byte of the BG DIB table (DSKPOSF1, DSKPOSF2 etc. for the other partitions). 

The addresses of the DIB tables are contained in bytes 96 and 97 (X'60 1 - X'61 ') of the appropriate partition communication region. 



TABLES FOR MO DTF ADDRESSES AND POINTERS 



The table of DTF addresses (PDTABB) contains six 8-byte entries; o 
line of the direct control feature on the system. 



Byte 


| 1 | 2 | 3 


4 


3 | 6 | 7 


AND instruction 


Owner 

ship 

Flags 


DTF address for MICR 



8 
16 
24 
32 
40 


Nl PDSTAT+1 XTE' 
Nl PDSTAT+1 X'FD' 
Nl PDSTAT+1 X'FB' 
Nl PDSTAT+1 X'F7' 
Nl PDSTAT+1 X'EF' 
Nl PDSTAT+1 X'DF' 




Device on line 7 
Device on line 6 
Device on line 5 
Device on line 4 
Device on line 3 
Device on line 2 



Contain an 'AND'instruction that is executed in main line coding to turn 
off the external line status after its detection. 

PDSTAT+1 will contain one or more of the following interrupt codes: 



External interrupt 


Interrupt Code 


External interrupt 


code bit 


(byte X'87') 
nnnnnnnl 


cause 


15 


External signal 7 


14 


nnnnnnln 


External signal 6 


13 


nnnnnlnn 


External signal 5 


12 


nnnnlnnn 


External signal 4 


11 


nnnlnnnn 


External signal 3 


10 


nnlnnnnn 


External signal 2 



n= other external interrupt conditions 

Byte 4 Contains the flag of the partition containing the DTF 

Background= 10 
Foreground= 20-50, depending on the number of partitions 

Bytes 5-7 Contain the address of the DTF table 

Table of pointers (PDTABA) to DTF addresses with the external interrupt line. The table 
is set up to handle the status in descending order from bit 15 to bit 10 of the external 
interrupt code. 

PDTABA 



Byte 


o 


< 


» 


1 ' 


1 < 


1 5 


1 « 


1 7 





00 


08 


00 


10 


00 


08 


00 


18 


8 


00 


08 


00 


10 


00 


08 


00 


20 


16 


00 


08 


00 


10 


00 


03 


00 


18 


24 


00 


08 


00 


10 


00 


08 


00 


28 


32 


00 


08 


00 


10 


00 


08 


00 


18 


40 


00 


08 


00 


10 


00 


08 


00 


20 


48 


00 


08 


00 


10 


00 


08 


00 


18 


56 


00 


08 


00 


10 


00 


08 


00 





Bytes 126 and 127 (X'7E'-X'7F') of the partitions communication region contain the 
address of these tables. Label PDTABB identifies the first byte of the first table. 
The tables are also used for optical reader /sorters . 



ERROR RECOVERY PROCEDURE INFORMATION BLOCK (ERPIB) 



csw 


Sense 
Information 


PUB 


Channel 
Queue Pointer 



Reserved 


Message 






Flag Byte 


Extended 
CSW 


17 


18 


19 




20 21 23 
Requestor Identification 



Byte 20: Flag Byte: 



t : 1= Channel Check on SIO 

1-4 : Not used 

5: I = Sense data stored 

6 : 1= DASD ERPIB active 

7 : Not used 



Note: A free entry is indicated by X'FE'in byte zero, end of queue is indicated 
by *FF'in byte zero. 
Lable ERPIBQ indentifies the first byte of Queue. 



ERROR RECOVERY BLOCK AND ERROR QUEUE ENTRY 



|o , 


8 9 


10 11 


12 13 


14 15 


First error queue entry 1 


Name of phase 
to be fetched 


Branch address 
to retry the 
the failing 
operation 


Branch address 
to ignore the 
error 


Branch address 
to cancel the 
task 


Return address 
for A-transient 






Error qu 



Last error queue entry! 



The A-transient loads one of these addresses in 
register 14 before branching to the return address 
(see bytes 14-15) 



ries (44 bytes each). 

The number of entries is determined 
at supervisor generation. 



Layout of any Error Queue entry 
i, Bytes 0- 7: CSW 

Bytes 8- 9: Address of PUB for device it 
Byte 10: Flag byte: 



Bit 0: 1= No record found on DASD 
1: 1= Intervention required 
2: 1= Passback (Set by device ERP) 
3: 1= Allow ignore 
4: Not used 
5: 1= Allow retry 
6: Not used 
7: 1= Active entry 

Message code: may refer to a device error 
recovery message generated by physical 
IOCS (See Cancel codes and Messages) or: 



Byte 11: This location may contain one of the following: 

(Cont'd) X'E2' =The error is recoverable 

X'AE' = A record is to be recorded on the system recorder file for SVC44 or a 
BTAM appendage routine, and a physical transient is to be fetched (last two 
characters of phase name are in bytes 20-21). 

Bytes 12-15: Disk seek address or address of effected PIB (for alternate entry) 

Bytes 16-19: Address of CCB 

Bytes 20-43: Sense data: The number of sense bytes generated depends on the options speci- 
fied; the minimum is 24 bytes, 
or: 

Alternate entry name: If byte 11 contains X'AE', bytes 20-21 contain the last 
two characters of the phase name of the physical transient to be fetched for 
SVC44 (A3) or BTAM (A5). X'AF' in byte 22 indicates that the I/O area asso- 
ciated with an alternate entry has been fixed temporarily. 

Note: The address of the Error Block can be found in SYSCOM at displacement (X'00'). 



CANCEL CODES AND MESSAGES 



Cancel 
Code (hex) 


Message 
Code 


Descriptive part of Message 
or Condition 


Label 


00 





In all other cases than the ones 
mentioned hereafter. Default value. 




10 




Normal EOJ 


ERR 10 


11 


0V07I 


No channel program translation for unsuppor- 
ted device 


ERR 11 


12 


0V06I 


Insufficient buffer space for channel program 
translation 


ERR 12 


13 


0V05I 


CCW with count greater than 32 K 


ERR 13 


14 


0V04I 


Page pool too small 


ERR 14 


15 


0V02I 


Page fault in disabled program 


ERR 15 


16 


0V01I 


Page fault in MICR stacker select or 
PHO routine 


ERR 16 


17 


0S02I 


Program request (Same as 23 but causes dump 
because subtasks were attached when main- 
task issued CANCEL macro) 


ERR 17 


18 




Eliminates cancel message when maintask 
issues DUMP macro with subtasks attached 




19 


0P74I 


I/O operator option 


ERR 19 


1A 


0P73I 


I/O error 


ERR1A 


IB 


0P82I 


Channel failure 


ERR IB 


1C 


0S14I 


CANCEL ALL macro 




ID 


0S12I 


Main task termination 




IE 


0S13I 


Unknown ENQ requestor 




IF 


0P81I 


CPU failure 


ERR IF 


20 


0S03lor 
0S11I 


Program check 


ERR20 


21 


0S04lor 
0S09I 


Illegal SVC 


ERR21 


22 


0S05lor 
0S06I 


Phase not found 


ERR22 


23 


0S02I 


Program request 


ERR23 


24 


0S01I 


Operator intervention 


ERR24 


25 


0P77I 


Invalid address 


ERR25 


26* 


0P71I 


SYSxxx not assigned (unassigned LUB code) 


ERR26 


27 


0P70I 


Undefined logical unit 


ERR27 


28 




QTAM cancel in progress 




29 


0S15I 


No relocating loader support (Fetch or load 
request for relocatable phase while supervisor 
does not support relocating load) 


ERR29 



CANCEL CODES AND MESSAGES (. . . .Cont'd) 



Cancel 
Code (hex) 


Messages 
Code 


Descriptive parr of Message 
or Condition 


Label 


2A 


0V10I 


I/O error on page data set 




2B 


0P84I 


I/O error during fetch from PCIL 


ERR2B 


2C 


0V09I 


Illegal parameter passed by PHO routine 


ERR2C 


2D 


0P88! 


Program cannot be executed/restarted due to 
failing storage block 


ERR2D 


2E 


0S16I 


Invalid resource request (possible deadlock) 


ERR2E 


2F 


0V03I 


More than 255 PFIX requests for 1 page 


ERR2F 


30 


0P72I 


Reading past/& statement (on SYSRDR or 
SYSIPT) 


ERR30 


31 


0P75I 


I/O error queue overflow (error queue over- 
flow) 


ERR31 


32 


0P76I 


Invalid DASD address 


ERR32 


33 


0P79I 


No long seek (disk) 


ERR33 


34 




Reserved 




35 


0P85I 


Job control open failure 


ERR35 


36 


0V08I 


Page fault in I/O appendage routine 


ERR36 


37 




Reserved 




38 


0V11I 


Wrong privately translated CCW 


ERR38 


39 




Reserved 




40 


5J95I 


VTAM termination 




41 


5J96I 


VTAM termination 




FF 


0P78I 


Unrecognized cancel code 






0P83A** 


Supervisor catalog failure 






0P87A** 


IPL failure 





If the CCB is not available, the logical unit is SYSxxx. 

The cancel code is not significant in case of a supervisor catalog or IPL 
failure, because the system is placed in the wait state without any further 
processing by the Terminator. 



Note : In addition to recognizing the cancel codes above, the Terminator also 

recognizes the same codes with the X'80' bit on (cancel occurred in LTA). 
The X'80' bit is tested by SSBEOJ and subsequently reset. 



PUB2 ENTRY ADDRESSING 



A device PUB 



L. 



0— 



m- 



._] 



' Length of PUB2 AREA 



Address of PUB2 AREA 



• PUB2 INDEX TABLE 



2 bytes entries giving the 
displacement from the be- 
ginning of the PU82 AREA 



How to find the PUB2 entry for o device; 

[T] Subtract from the address of the device 
PUB, the PUB Table start address and 
divide the result by 4. 

J2] Find in the RF Table at displacement 52 
(X'34') the PUB2 Index Table. 

fjj Use the result from Q] as a displacement 
into the PUB2 Index Table. This will give 
you the two bytes index (i.e. displacement) 
of the PUB2 entry of the device PUB. 

GQ Find in the RF Table at displacement 48 
(X'30') the address of the PUB2 AREA. 

{|i] Use the value from (5] as a displacement 
in the PUB2 AREA. 



See PUB2 for the format of 
the entries for the various 
device types 



Note: PUB2AREA is not generated for model 1 15, 125 without RMSR support. 



PUB 2 Table Entry Format for Unit Record and Unsupported Devices 



Decimal 
Displace- 
ment 


Byte 
Length 


Description 



3 

4 
5 
6 


3 

1 

1 
1 
6 


Usage Count (number of non-ERP SIO's) 

Flag Byte: Bit 0. 1= Device in intensive mode 
1: 1= Device in diagnostic mode 
2: 1= No recording mode 
3: 1= Call statistics transient 2 
4: 1= Use PUB 2 name completion field 
5: 1= Volume opened on this device 
6 , 7: Reserved 

CE mode limit byte 

CE mode byte/bit mask 

Statistical data counters 


Total length 12 



PUB 2 Tab 


e Entry Format for DASD 


Decimal 
Displace- 
ment 


Byte 
Length 


Description 





3 


Usage Count (number of non-ERP SIO's) 


3 


1 


Flag byte: Bit 0: 1= Device in intensive mode 
1: 1= Device in diagnostic mode 
2: 1= No recording mode 
3: 1= Call statistics transient 2 
4: 1= Use PUB 2 name completion field 
5. 1= Volume opened on this device 
6 , 7: Reserved 


4 


1 


CE mode limit byte 


5 


1 


CE mode byte/bit mask 


6 


1 


Flag byte: Bit 0: 1= Soft DASD error is queued 
Bit 1: 1= ERP requests logging of error 
2-7: Reserved 


7 


2 


Reserved 


9 


1 


Physical module identifier 


10 


6 


Volume serial number 


End 3340 


Total length 16 


.< 


8 1 Statistical data counters 


End DASD 


except 33XX Total length 24 


24 


8 J Additional statistical data counters (3330 only) 


End 3330 c 


md 3350 Total length 32 



PUB 2 TABLE (....Cont'd) 

PUB 2 Table Entry Formats for Topes 



Decimal 


Byte 




Displace- 


Length 


Description 


ment 









3 


Usage Count (number of non-ERP SIO's) 


3 


1 


Flag Byte: Bit 0: 1= Device in intensive mode 
1: 1= Device in diagnostic mode 
2: 1= No recording mode 
3: 1= Call statistics transient 2 
4: 1= Use PUB2 name completion field 
5: 1= Volume opened on this device 
6-7: Reserved 


4 


1 


CE mode limit byte 


5 


1 


CE mode byte/bit mask 


6 


2 


Name of ERP that wants control 


8 


1 


Flag byte 1: Bit 0: Reserved 

1: 1= Unsolicited interrupt 
2: 1= ERP is in control 
3: 1= ERP requests repositioning 
4: 1= Use original TIE byte 
0= Use opposite TIE byte 
5: 1= Intercept next SIO request 
6: 1= ERP read opposite request 
7: 1= Restart user's CCW chain 


9 


1 


F lag byte 2: Bit 0: 1= Last ERP operation was ERG 

1: 1= Last ERP operation was reposition 
2: 1= Cleaner action in progress 
3: 1= Read Opposite Recovery in progress 
4: 1= Message stored in P20RGT IE 
5: 1= Error on attempt to recover by reposi- 
tioning 
6: 1= Data check after ERP in control 
7: Reserved 


10 


1 


Flag byte 3: Bit 0: 1= Failing CCW is Write or Control 
command 
1: 1= User reading backwards 
2: 1= Read Opposite Recovery (ROR) 
3: 1= Maximum ROR retries 
4: 1= Command chaining ROR 
5: 1= ROR suppressed incorrect length 
6: 1= User used SILI 

(Suppress Incorrect 

Length Indicator) 
7: Reserved 


11 


1 


Temporary read count 


12 


1 


Temporary write count 


13 


1 


Noise record count 


14 


2 


Erase gap count 


16 


2 


Cleaner action count 


18 


1 


Permanent read errors count 


19 


1 


Permanent write errors count 



PUB2 TABLE (....Cont'd) 

PUB 2 Toble Entry Formats for Tapes 



Decimal 
Displace- 
ment 


Byte 
Length 


Description 


20 


1 


TIE original direction 


21 


1 


TIE opposite direction 


22 


1 


ERP counter 


23 


1 


ERP counter 1 


24 


8 


ERP work area 


32 


6 


Tape serial number 


38 


2 


Block Length 


40 


4 


User ROR command address from CSW 


44 


2 


User ROR residual count from CSW 


46 


2 


Reserved 


48 


16 


Work area for rewind-unload error action 


64 


10 


2400-series statistical data counter area 


74 


2 


Reserved 


End 2400- 


eries : Tc 


tal length 76 


48 


20 


3410/3420 statistical data counter area 


End 3410/ 


3420 : Total length 84 



Note : PUB2 Table is not generated for Model 115 and 125, without RMSR support. 



PUB 2 Table Entry Format for 3886 Optical Character Reader 



Decimal 
Displace- 


Byte 
Length 


Description 



3 

4 
5 
6 


3 

1 

1 
1 
20 


Usage count (number of non-ERP SIO's) 

Flag byte: Bit 0: 1= Device in intensive mode 
1: 1= Device in diagnostic mode 
2: 1= No recording mode 
3: 1= Call statistics transient 2 
4: 1= Use PUB2 name completion field 
5: 1= Volume opened on this device 
6-7: Reserved 

CE mode limit byte 

CE mode byte/bit mask 

Statistical data counters 


End 3886 Total length 26 



PUB2 TABLE (....Cont'd) 

PUB 2 Table Entry Format for 3540 Diskette 



Decimal 
Displace- 
ment 


Byte 
Length 


Description 





3 


Usage Count (number of non-ERP SIO's) 


3 


1 


Flag byte: Bit 0: l=Device in intensive mode 
1: 1=Device in diagnostic mode 
2: l=No recording mode 
3: l=Call statistics transient 2 
4: l=Use PUB2 name completion field 
5: 1=Volume opened on this device 
6-7: Reserved 


4 


1 


CE mode limit byte 


5 


1 


CE mode byte/bit mask 


6 


8 


Statistical data counters 


14 


1 


Bit 0-5: Reserved 

6: 1=System file opened by Job Control 

7: l=System file opened by Problem Program 


15 


1 


Reserved 


End 3540 


To 


tal length 16 



RECORDER FILE TABLE (RF TABLE) 



Displacement 


Label 


Byte 
Length 


Description 


Dec 


Hex 






RFTABLE 




Label of Starting Address 




1 



1 


RFFLAGS1 
RFFLAGS2 


1 

1 


Bit 0: 1= File full 

1: 1= RDE option included 

2: 1= Initial IPL 

3: Reserved 

4: 1= File is to be created 

5: 1= File has been created 

6: Reserved 

7: 1= File open and ready 

Bit 0: 1= File full message request 
1:1= Last track message request 
2: 1= I/O error message request 
3: 1= Data lost message request 
4: 1= EVA message request 
5: 1= File owned by RTA recorder 
6: 1= File owned by PTA recorder 
7: 1= File being accessed by EREP 


2 


2 


RFFLAGS3 


1 


Bit 0: 1= Last track message issued once 
1:1= Error is to be recorded 
2: 1= Short form record request 
3: 1= Individual records for unlabeled tapes 
4: 1= Reserved 
5: 1= Reserved 
6: 1= Exit to SSBOMT05 indicator for 

SSBOPEN 
7: 1= Exit to SSBOMT01 indicator for 
SSBOPEN 


3 


3 


RFFLAGS4 


1 


Work area switches for various transients 
including BTAM 

Bit 0: 1 = multiple records required 

(3211 recording) 
1:1 = PLB record required (3211 

recording) 
2:1= FCB record required (3211 

recording) 
3: 1 = UCB record required (3211 

recording) 
4:1= Ignore exit requested 

(3211 recording) 
5: Not used 
6: Not used 
7: 1 = record not written 


4 


4 


RFFLAGS5 


1 


Reserved 


5 


5 


RFNOFN 


1 


N of N records (low order 4 bits contain the 
number of records to be recorded and high 
order 4 bits contain the record number being 
processed 


6 


6 


RFRECTYP 


1 


Record type code 


7 


7 


RFREL 


1 


DOS/VS ID-Release Level code 



RECORDER FILE TABLE (RF TABLE) (....Cont'd) 



Displacement 


Label 


Byte 
Length 


Description 


Dec 


Hex 


8 


8 


RFRDSW 1 


1 


Record dependent switch 1 


9 


9 


RFRDSW2 


1 


Record dependent switch 2 


10 


A 


RFEXIT 


2 


Exit phase name or exit address 


12 


C 


RFMCONST 


2 


Multiplier for track balance 


14 


E 


RFDCONST 


2 


Divisor for track balance 


16 


10 


RFOCONST 


2 


Overhead track for balance 


18 


12 


RFRECLEN 


2 


Length of record 


20 


14 


RFTIMEA 


4 


Address of RMSR time entry 


24 


18 


RFRECADR 


4 


Address of record 


28 


1C 


RFSEEK 


7 


Work area for seek address(BBCCHHR) 


35 


23 


RFEREPK 


1 


Key of EREP partition 


36 


24 


RFHDRCH 


4 


SYSREC cylinder/head 


40 


28 


RFCHMAP 


1 


Map of supported channels 


41 


29 


RFCHIDC 


3 


Channel ID codes 


The following 


entries are n< 


>t generated for Model 115, 125 without RMSR support 


44 


2C 


RFEVARTH 


1 


EVA read treshold 


45 


2D 


RFEVAWTH 


1 


EVA write treshold 


46 


2E 


RFP2ENTL 


2 


Length of PUB2 Entry Area 


48 


30 


RFP2ENT 


4 


Address of PUB2 Entry Area 


52 


34 


RFP2ITAB 


* 


PUB2 Index Table 



Two bytes are generated for each PUB2 entry in the system. (See PUB2 Entry Address'rg for 
using the PUB2 Index Table to access the PUB2 entries. 

Bytes 100-103 (X'64'-'67') of the system communication region (SYSCOM) 
contain the address of the Recorder File Table. 
Label RFTABLE identifies the first byte of the table. 



CRT CONSTANT TABLE (CRTTAB) 



Name of 
CRT Routine 


Dummy 
Sense 
Byte 


Address of 

CRT 
Save Area 


Flag 
Byte 1 


Address of 

CRT 
Trans.Area 


Flag 
Byte 2 


Address of 
System Task 
Save Area 


CRT error 
Information 

*) 



Byte 8 - Sense byte: 



*)limited channel 
logout is saved here 



Bit 1 
Bit 4 
Bit 7 



1= Command reject 

1= Intervention required (only if Console Printer is attached) 
1= Equipment check (only if Console Printer is attached) 
1= Operation check 

this byte is used for saving Name Indicator 



Byte 12 -Flog Byte 1; 



X'80' 


= 


ERP message 


XMO' 


= 


Unit check for CRT 


X'20' 


= 


CRT Fetch bound 


X'10' 


= 


Device End simulated 


X'08' 


= 


Validation error 


X'04' 


= 


Re-display mode 


X'02' 


= 


CRT error 


Byte 16 


-Flag Byte 2: 


X'80' 


= 


CRT busy 


XMO' 


= 


Sense byte prepared 


X*20' 


= 


End of CRT routine 


XMO' 


= 


Data already read 


X'08' 


= 


Attention pending 


X'04' 


= 


Request pending 


X'02' 


= 


Attention request 


X'Ol' 


= 


EOJ on CRT 



Bytes 52-55 (X'34'-X'37') of the System Communication Region (SYSCOM) 
contain the address of the CRT CONSTANT Table. 
Label CRTTAB identifies the first byte of the table. 



PROGRAM CHECK OPTION TABLE 



PC Routine Address 


Save Area Address 



Bytes 0-3 : 



Bytes 4-7 : 



No STXIT Issued 

STXIT issued 

STXIT issued and 
the user routine 
is already in use 

No STXIT issued 
STXIT issued 



Address of the user Program Check Rout in 



Complement of user Program Check Routine 
address 



zero 

Address of the user Save Area 



Note: In a supervisor without multiprogramming support, there is only one entry 
(BG) in each generated table. With multiprogramming support, there is 
is one entry for each partition supported. 

With asynchronous processing support, each generated table always comprises 
15 entries; the subtask entries occupy the higher address locations.in the 
table. 

Bytes 100-101 (X'M'-X'dS') of the partition communication region contain 
the address of the PC Option Table. Label PCTAB identifies the frist byte 
of the table. 



OPERATOR COMMUNICATION OPTION TABLE 





BG 


\ 
\ 
n \ 


Fn 


O-n 






no 

or •* 




F2 


^ / 


Fl 


/ 

/ 



3 


4 7 


OC Routine Address 


Save Area Address 1 



Bytes 4-7 : 



No STXIT issued : 

STXIT issued : 

STXIT issued and 
the user routine 

is already in use : 

No STXIT issued : 

STXIT issued : 



Address of the user Operator Communication 
Routine 



Complement of the u 
Routine address 



r Operator Comi 



Address of the user Save Area 



Note: In a supervisor without multiprogramming support, there is only one entry 
(BG) in each generated table. 
With multiprogramming support, there is one entry for each partition supported. 



Bytes 104-105 {X'6S'-X'69') of the partition communication region contain 
the address of the OC Option Table. Label OCTAB identifies the first byte 
of the table. 



INTERVAL TIMER OPTION TABLE 



Bytes 0-3 : 



Bytes 4-7 : 



No TECB or STXIT 
issued : 

TECB issued : 

STXIT issued : 

STXIT issued ond 
user routine is 
already in use : 

No TECB or STXIT 

TECB issued : 

STXIT issued : 



Address of the timer event control block 
Address of user interval timer routine 

Complement of the user interval timer routine 

zero 

Complement of the TECB address 

Address of the user save area 



Note: One table entry is built for each partition supported and an IT Request table 
is also built. 

With timer and asynchronous processing supported, the table always comprises 

15 entries ; the subtask entries occupy the higher address locations in the 

table. 

Bytes 102-103 (X'oo'-XW) of the partition communication region contain 

the address of the IT Option Table. Label ITTAB identifies the first byte of 

the table. 



TASK TIMER OPTION TABLE 



3 


4 


7 


8 


15 


Exit 

Routine 

Address 


Save 
Area 
Address 


Task Tim 


er Interval 



STXIT issued: Address of entry point of user's task 
timer routine address. 



STXIT issued and user's routine already in use: 
Complement of the task timer routine address 



No STXIT issued : zero. 

STXIT issued : Address of the user's save area. 



Bytes 8 - 15 : No SETT issued : zero or negative. 

SETT issued : Time remaining of the interval specified. 
The time is expressed in micro-seconds in bits 4-51. 
Bits 52-63 are ignored. 



Bytes 176 - 179 (X"B0-B3) of the System 

Communications region (SYSCOM) contain 

the address of Task Timer Table. 

Lable TTTAB identifies the first byte of the table. 



INTERVAL TIMER REQUEST TABLE 



00 FF 00 00 00 



Task 
Identifier 



Byte 0: PIK or TIK (X N 10-X S F0') of the program or task that issued 

the SETIME macro. If the entry is not used or is the last 
entry, byte contains X"00'. 

Bytes 1-4: Time interval that will elapse between the occurrence of the 

currently pending interrupt in SYSTIMER and the occurence 
of the interrupt itself. The entries are in ascending order of 
magnitude, that is, the smallest interval appears first. If the 
entry is not used or is the last entry, bytes 1 - 4 contain 
the highest interval possible (X'FFOOOOOO'). 
The interval corresponding to the currently pending interrupt 
is in SYSTIMER (address X*50') and the key of the respective 
program or task is in TWTIMS. 



INTERVAL TIMER REQUEST TABLE (...Continued) 



This table is only used wfien timer interrupt occurs while an interrupt 
from another partition of task is pending. See SVC 24 in DOS/VS 
Supervisor. 



Bytes 80-83 (X'50' - X'53') of the System communication regior 
(SYSCOM) contain the address of the IT Request Table. Label 
ITREQ identifies the first byte of the table. 



ABNORMAL TERMINATION OPTION TABLE 



\0 1 



Flags 


1 r - 

AB 

Routine Address 

1 , 1 


Can- 
cel 
Code 


Save Area Address 
1 1 



/ 






Byte 0: 


BitO 
Bit 1 

Bits 2-7 


: Zero 

of abnormal termination routine. 
: Reserved 


Bytes 1- 


3: No STXIT issued 
STXIT issued one 


: Zero 

AB routine. When a subtask is ATTACHed 
after a STXIT AB macro has been issued by 
the maintosk, the subtask will receive the 
AB routine address specified by the maintosk 
only if the ATTACH macro for that subtask 
has the ABSAVE parometer specified. The 
subtask can override this by issuing its own 
STXIT AB macro. 


Byte 4: 


STXT issued and 






progress 


: Original cancel code (see Figure 4,38) 




c^IXians 


: Zero 


Bytes 5- 


7: No STXIT issued 






parometer passed 


: Zero 




STXIT issued and 


: Address of a 72-byie save area used by the 
registers. (See Chapter 12.) 



Note: One table entry is generated for each partition supported. 

With asynchronous processing support, the table always comprises 15 entries; 
the subtask entries occupy the higher address locations in the table. 

Bytes 84-87 (X'54'-X'57') of the System Communication region (SYSCOM) 
contain the address of the AB Option Table. Label ABTAB identifies the 
first byte of the table. 



PAGE FAULT HANDLING OVERLAP OPTION TABLE 



Page Fault Information 



-Flag Byte 



Byte 



1- A page fault from the task is in the Page Queue Table 

1= A page fault occuring in a supervisor service of the 
task is queued in the Page Queue Table 



Bits 2-7: Unused 



Bytes 1-3 : 
Bytes 4-7 : 



Addr. 



,s of the 



s page fault appendage routini 



Page fault information (for detailed layout see Page Queue Table) 

This information is stored here only when a page fault occurs in a 
supervisor service working for the task, while another page fault is 
queued for the task in the Page Queue Table, otherwise zero 



NO SETPFA issued 



Bytes 0-7 : 



Note: PFATAB is only built if PHO=YES was specified in the SUPVR macro 
at supervisor generation . 

One table entry is generated for each partition supported. With asynchronous 
processing support, the table always comprises 15 entries; the subtask entries 
occupy the higher address locations in the table. 

Label PFATAB identifies the first byte of the table. 



JOB ACCOUNTING INTERFACE COMMON TABLE 



Displacement 


Label 


Description 




(ACCTCOMN) 




-15 


ACCTSVRG 


Temporary register save area 


16-17 


ACCTSVRX 


Save area for remainder of overhead counter 
times distributed by partition on exit 


18-19 


ACCTSVRE 


Save area for remainder of all-bound counter 
times distributed by partitions on entry 


20-23 


ACCTPCNT 


Count of partitions using the Job Accounting 
interface 


24 


ACCTSAID 


Owner of physical transient area *) 


25 


ACCTFAID 


Interrupted program *) 


26 


ACCTRAID 


Active program *) 


27 


ACCTSWCH 


Accounting switches: if bit= 1 ,true ; if bit = 0, 
not true 

bit 0: cancel accounting bit 4: IPL indicator 
bit 1: no active partitions bit 5: not used 
bit 2: catalog in process bit 6: not used 
bit 3: alternate label area bit 7: not used 


28-31 


ACaiME 


Start time of current accounting interval, in 
complement format 


32-33 


ACaRESC 


Reserved 


34-35 


ACaUSEP 


Address of user save area (ACCTUSER) 


36-37 


ACaUSEL 


Length of user save area (Set with 1st operand 
of FOPT macro parameter JALIOCS) 


38-39 


ACCTSJOB 


Job accounting partition indication 


40-43 


ACaBLES 


Address of BG Job Accounting Table 



If multiprogramming is supported, this table is to be extended (depending on the 
number of supported partitions) according to the pattern shown below otherwise 
the table ends here. 



f- (n*2)-l 



Address of Fn Job Accounting Table 



Address of F2 Job Accounting Table 

Address of F1 Job Accounting Table 

Control Field: prevents the accounting routine 
being loaded twice 



*) These values are the same as the PIK values for the relevant tasks 

Byte 124-127(X , 7C , -'7F') of the system communication region (SYSCOM) contain the 
address of the Job Accounting Interface Common Table. 
Label ACCTCOMN identifies the first byte of the table. 



JOB ACCOUNTING INTERFACE PARTITION TABLE 



Displacement 


Label 


Description 




(ACCTABLE) 




-3 


ACCTWK1 


Work area used in SIO update 


4 -7 


ACCTWK2 


Work area used with ACCTWK 1 in start/stop 
time routine 


8 -11 


ACCTSVPT 


Job card pointer; address of job card field 
Following jobname 


12 


ACCTPART 


ID of partition in charge (partition switch 
name) 


13 


ACCTRES2 


Reserved 


14-15 


ACCTLEN 


Length of SIO area= 6n+l, where n= number 
of devices for this partition in SYSGEN 
option JA=(n,n,...) 


16-21 


ACCTLOAD 


Label area instruction; moves JAI label area 
address to OPEN/CLOSE transients 


22-23 


ACaRES3 


Reserved 


24-27 


ACaiADD 


Address of alternate label area 


28-31 


ACCTCPUT 


Counter for CPU time elapsed in a jobstep, 
counted in 300th of a second 


32-35 


ACCTOVHT 


Counter for overhead time; time not charged 
to any partition 


36-39 


ACCTBNDT 


Counter for all-bound time; system wait state 
time divided between running partitions 


40-47 


ACCTSVJN 


Save area for job name during simulated EOJ 


4¥l5' ~~ 


"ACCTJBNM 


Job name; taken from job card 


56-71 


ACaUSRS 


User information; 16 bytes from fob card 


72-73 


ACCTPTID 


Partition ID: *BG', *F1', *F2', etc. in 
EBCDIC format 


74 


ACaCNCL 


Cancel code; see Cancel Codes and Messages 


75 


ACCTYPER 


Type of record: 'S'= job step, 'L'= last step 


76-83 


ACCTDATE 


Date in format specified at SYSGEN 
(MM/DD/YY or DD/MM/YY) 


84-87 


ACCTSTRT 


Start time of a job-step, in packed decimal 
(DHHMMSSF ; F = sign) 


88-91 


ACCTSTOP 


Stop time of a job-step in the same format as 
ACCTSTRT. This value is used as the start 
time for the next step 


92-95 


ACCTRES 


Reserved 


96-103 


ACCTEXEC 


Phase name; taken from execute card 



/' 



JOB ACCOUNTING INTERFACE PARTITION TABLE (. . . . Cont'd) 



Displacement 


Label 


Description 


104-107 


ACCTHICR 


Real mode : the problem program end address 
reflecting ALLOCR or the SIZE = parameter 
on the EXEC statement 
Virtual mode : the virtual start address of the 
partition incremented by the amount of 
virtual storage referenced during this step 


108-111 


ACCTIMES 


CPU time elapsed in a job-step; counted in 
300th of a second 


112-115 





Overhead time; elapsed time not charged to 
any partition, in 300th of a second 


116-119 




All-bound time; system wait state time divided 
between running partitions, in 300th of a 
second 


120 


ACCTSIOS 


SIO tables: obytes for each device specified 
by SYSGEN options, as follows: 2 bytes for 
device address (Ocuu), 4 bytes for count of 
SIO's in current job -step 







Overflow byte: normally X'20', but is X'30' 
if more devices are used within a partition 
than specified by SYSGEN options 



Notes: DSECT ACCTABLE symbolically addresses the JAI Partition Tables with labels 
as shown. Each partition in which JAI is supported has its own JAI Partition 
Table. This table is labeled ACCTBG for the active partition BG; 
ACCTF1 for the active partition Fl; ACCTF2 for F2, etc. 

The address of this table is in the partition Communication Region at 
displacement 1 16 (X'74') 



ASCII EBCDIC TRANSLATION TABLES 



ASCII/EBCDIC (0/0 to 3/2) 



ASCII 


EBCDIC 




Charact. 


Col Row 


Bit Pattern 


Col Row 
(in hex) 


Bit Pattern 


Comments 


NUL 








0000 


0000 








0000 


0000 




SOH 





1 


0000 


0001 





1 


0000 


0001 




STX 





2 


0000 


0010 





2 


0000 


0010 




ETX 





3 


0000 


0011 





3 


0000 


0011 




EOT 





4 


0000 


0100 


3 


7 


0011 


0111 




ENQ 





5 


0000 


0101 


2 


D 


0010 


1101 




ACK 





6 


0000 


0110 


2 


E 


0010 


1110 




BEL 





7 


0000 


0111 


2 


F 


0010 


nn 




BS 





8 


0000 


1000 


1 


6 


0001 


0110 




HT 





9 


0000 


1001 





5 


0000 


0101 




LF 





10 


0000 


1010 


2 


5 


0010 


0101 




vr 





11 


0000 


1011 





B 


0000 


1011 




FF 





12 


0000 


1100 





C 


0000 


1100 




CR 





13 


0000 


1101 





D 


0000 


1101 




SO 





14 


0000 


1110 





E 


0000 


1110 




SI 





15 


0000 


1111 





F 


0000 


nn 




DLE 







0001 


0000 


1 





0001 


0000 




DC1 




1 


0001 


0001 


1 


1 


0001 


0001 




DC2 




2 


0001 


0010 


1 


2 


0001 


0010 




DC3 




3 


0001 


0011 


1 


3 


0001 


0011 




DC4 




4 


0001 


0100 


3 


C 


0011 


1100 




NAK 




5 


0001 


0101 


3 


D 


0011 


1101 




SYN 




6 


0001 


0110 


3 


2 


0011 


0010 




ETB 




7 


0001 


0111 


2 


6 


0010 


0110 




CAN 




8 


0001 


1000 


1 


8 


0001 


1000 




EM 




9 


0001 


1001 


1 


9 


0001 


1001 




SUB 




10 


0001 


1010 


3 


F 


0011 


nn 




ESC 




11 


0001 


1011 


2 


7 


0010 


0111 




FS 




12 


0001 


1100 


1 


C 


0001 


1100 




GS 




13 


0001 


1101 


1 


D 


0001 


1101 




RS 




14 


0001 


1110 


1 


E 


0001 


1110 




US 




15 


0001 


1111 


1 


F 


0001 


1111 




SP 


2 





0010 


0000 


4 





0100 


0000 




1 


2 


1 


0010 


0001 


4 


F 


0100 


nn 


Logical OR 


" 


2 


2 


0010 


0010 


7 


F 


0111 


nn 




/ 


2 


3 


0010 


0011 


7 


B 


0111 


1011 




S 


2 


4 


0010 


0100 


5 


B 


0101 


1011 




% 


2 


5 


0010 


0101 


6 


C 


0110 


1100 




& 


2 


6 


0010 


0110 


5 





0101 


0000 






2 


7 


0010 


0111 


7 


D 


0111 


1101 




( 


2 


8 


0010 


1000 


4 


D 


0100 


1101 




) 


2 


9 


0010 


1001 


5 


D 


0101 


1101 






2 


10 


0010 


1010 


5 


C 


0101 


1100 




+ 


2 


11 


0010 


1011 


4 


E 


0100 


1110 




, 


2 


12 


0010 


1100 


6 


B 


0110 


1011 




- 


2 


13 


0010 


1101 


6 





0110 


0000 


Hyphen, Minus 




2 


14 


0010 


1110 


4 


B 


0100 


1011 




/ 


2 


15 


0010 


1111 


6 


1 


0110 


0001 







3 





0011 


0000 


F 





1111 


0000 




1 


3 


1 


0011 


0001 


F 


1 


1111 


0001 




2 


3 


2 


0011 


0010 


F 


2 


nn 


0010 





ASCII EBCDIC TRANSLATION TABLES( 


...Cont'd) 


ASCII/EBCDIC (3/3 to 6/6) 


ASCII 


EBCDIC 




Charact. 


Col Row 


Bit Pattern 


Col Row 
(In hex) 


Bit Pattern 


Comments 


3 


3 


3 


0011 


0011 


F 


3 


1111 


0011 




4 


3 


4 


0011 


0100 


F 


4 


1111 


0100 




5 


3 


5 


0011 


0101 


F 


5 


mi 


0101 




6 


3 


6 


0011 


0110 


F 


6 


mi 


0110 




7 


3 


7 


0011 


0111 


F 


7 


mi 


0111 




8 


3 


8 


0011 


1000 


F 


8 


mi 


1000 




9 


3 


9 


0011 


1001 


F 


9 


mi 


1001 






3 


10 


0011 


1010 


7 


A 


0111 


1010 




; 


3 


11 


0011 


1011 


5 


E 


0101 


1110 




< 


3 


12 


0011 


1101 


4 


C 


0100 


1100 




= 


3 


13 


0011 


1101 


7 


E 


0111 


1110 




> 


3 


14 


0011 


1110 


6 


E 


0110 


1110 




? 


3 


15 


0011 


mi 


6 


F 


0110 


mi 




@ 


4 





0100 


0000 


7 


C 


0111 


1100 




A 


4 


1 


0100 


0001 


c 


1 


1100 


0001 




B 


4 


2 


0100 


0010 


c 


2 


1100 


0010 




C 


4 


3 


0100 


0011 


c 


3. 


1100 


0011 




D 


4 


4 


0100 


0100 


c 


4 


1100 


0100 




E 


4 


5 


0100 


0101 


c 


5 


1100 


0101 




F 


4 


6 


0100 


0110 


c 


6 


1100 


0110 




G 


4 


7 


0100 


0111 


c 


7 


1100 


0111 




H 


4 


8 


0100 


1000 


c 


8 


1100 


1000 




1 


4 


9 


0100 


1001 


c 


9 


1100 


1001 




J 


4 


10 


0100 


1010 


D 


1 


1101 


0001 




K 


4 


11 


0100 


1011 


D 


2 


1101 


0010 




L 


4 


12 


0100 


1100 


D 


3 


1101 


0011 




M 


4 


13 


0100 


1101 


D 


4 


1101 


0100 




N 


4 


14 


0100 


1110 


D 


5 


1101 


0101 




O 


4 


15 


0100 


1111 


D 


6 


1101 


0110 




P 


5 





0101 


0000 


D 


7 


1101 


0111 




Q 


5 


1 


0101 


0001 


D 


8 


1101 


1000 




R 


5 


2 


0101 


0010 


D 


9 


1101 


1001 




S 


5 


3 


0101 


0011 


E 


2 


1110 


0010 




T 


5 


4 


0101 


0100 


E 


3 


1110 


0011 




U 


5 


5 


0101 


0101 


E 


4 


1110 


0100 




V 


5 


6 


0101 


0110 


E 


5 


1110 


0101 




W 


5 


7 


0101 


0111 


E 


6 


1110 


0110 




X 


5 


8 


0101 


1000 


E 


7 


1110 


0111 




Y 


5 


9 


0101 


1001 


E 


8 


1110 


1000 




Z 


5 


10 


0101 


1010 


E 


9 


1110 


1001 




c 


5 


11 


0101 


1011 


4 


A 


0100 


1010 




\ 


5 


12 


0101 


1100 


E 





1110 


0000 


Reverse Slant 


] 


5 


13 


0101 


ll'l 


5 


A 


0101 


1010 




-. 


5 


14 


0101 


1110 


5 


F 


0101 


mi 


Logical Not 


_ 


5 


15 


0101 


mi 


6 


D 


0110 


1101 


Underscore 




6 





0110 


0000 


7 


9 


0111 


1001 


Grave accent 


a 


6 


1 


0110 


0001 


8 


1 


1000 


0001 




b 


6 


2 


0110 


0010 


8 


2 


1000 


0010 




c 


6 


3 


0110 


0011 


8 


3 


1000 


0011 




d 


6 


4 


0110 


0100 


8 


4 


1000 


0100 




e 


6 


5 


0110 


0101 


8 


5 


1000 


0101 




f 


6 


6 


0110 


0110 


8 


6 


1000 


0110 





ASCII EBCDIC TRANSLATION TA3LES(.... Cont'd) ASCII/EBCDIC (6/7 to 7/15) 



ASCII 


EBCDIC 




Charact. 


Col Row 


Bit Pattern 


Col Row 


Bit Pattern 


Comments 


g 


6 7 


0110 


0111 


8 


7 


1000 


0111 




h 


6 8 


0110 


1000 


8 


8 


1000 


1000 




r 


6 9 


0110 


1001 


8 


9 


1000 


1001 




j 


6 10 


0110 


1010 


9 


1 


1001 


0001 




k 


6 11 


0110 


1011 


9 


2 


1001 


0010 




l 


6 12 


0110 


1100 


9 


3 


1001 


0011 




m 


6 13 


0110 


1101 


9 


4 


1001 


0100 




n 


6 14 


0110 


1110 


9 


5 


1001 


0101 




o 


6 15 


0110 


1111 


9 


6 


1001 


0110 




P 


7 


0111 


0000 


9 


7 


1001 


0111 




q 


7 1 


0111 


0001 


9 


8 


1001 


1000 






7 2 


0111 


0010 


9 


9 


1001 


1001 




s 


7 3 


0111 


0011 


A 


2 


1010 


0010 




t 


7 4 


0111 


0100 


A 


3 


1010 


0011 




u 


7 5 


0111 


0101 


A 


4 


1010 


0100 




V 


7 6 


0111 


0110 


A 


5 


1010 


0101 




w 


7 7 


0111 


0111 


A 


a> 


1010 


0110 




x 


7 8 


0111 


1000 


A 


7 


1010 


0111 




y 


7 9 


0111 


1001 


A 


8 


1010 


1000 






7 10 


0111 


1010 


A 


9 


1010 


1001 




{ 


7 11 


0111 


1011 


C 





1100 


0000 




1 


7 12 


0111 


1100 


6 


A 


0110 


1010 


Vertical Line 


I 


7 13 


0111 


1101 


D 





1101 


0000 




7 14 


0111 


1110 


A 


1 


1010 


0001 


Tilde 


DEL 


7 15 


0111 


mi 





7 


0000 


0111 




EBCDIC 


ASCII 




Charact 


Col Row 


BitP 


attern 


Col Row 


Bit P 


attern 


Comments 




(in hex) 
















NUL 





0000 


0000 








0000 


0000 




SOH 


1 


0000 


0001 





1 


0000 


0001 




STX 


2 


0000 


0010 





2 


0000 


0010 




ETX 


3 


0000 


0011 





3 


0000 


0011 




HT 


5 


0000 


0101 





9 


0000 


1001 




DEL 


7 


0000 


0111 


7 


15 


0111 


mi 




VT 


6 


0000 


1011 





11 


0000 


ion 




FF 


C 


0000 


1100 





12 


0000 


1100 




CR 


D 


0000 


1101 





13 


0000 


1101 




SO 


E 


0000 


1110 





14 


0000 


1110 




SI 


F 


0000 


1111 





15 


0000 


nn 




DLE 


1 


0001 


0000 







0001 


0000 




DC1 


1 1 


0001 


0001 




1 


0001 


0001 




DC2 


1 2 


0001 


0010 




2 


0001 


0010 




DC3 


1 3 


0001 


0011 




3 


0001 


0011 




BS 


1 6 


0001 


0110 





8 


0000 


1000 




CAN 


1 8 


0001 


1000 




8 


0001 


1000 




EM 


1 9 


0001 


1001 




9 


0001 


1001 




FS 


1 C 


0001 


1100 




12 


0001 


1100 




GS 


1 D 


0001 


1101 




13 


0001 


1101 




RS 


1 E 


0001 


1110 




14 


0001 


1110 




US 


1 F 


0001 


1111 




15 


0001 


nn 





EBCDIC to ASCII (X'OO'to'lF') 



ASCII EBCDIC TRANSLATION TABLES(.... Cont'd) EBCDIC to ASCII (X'25toX'93') 



EBCDIC 


ASCII 




Characf. 


Col Row 


Bit Pattern 


Col Row 


Bit Pattern 


Comments 




(in hex) 
















LF 


2 


5 


0010 


0101 





10 


0000 


1010 




ETB 


2 


6 


0010 


0110 


1 


7 


0001 


0111 




ESC 


2 


7 


0010 


0111 


I 


11 


0001 


1011 




ENQ 


2 


D 


0010 


1101 





5 


0000 


0101 




ACK 


2 


E 


0010 


1110 





6 


0000 


0110 




BEL 


2 


F 


0010 


1111 





7 


0000 


0111 




SYN 


3 


2 


0011 


0010 


1 


6 


0001 


0110 




EOT 


3 


7 


0011 


0111 





4 


0000 


0100 




DC4 


3 


C 


0011 


1100 


1 


4 


0001 


0100 




NAK 


3 


D 


0011 


1101 


1 


5 


0001 


0101 




SUB 


3 


F 


0011 


mi 


1 


10 


0001 


1010 




S'P 


4 





0100 


0000 


2 





0010 


0000 




[ 


4 


A 


0100 


1010 


5 


11 


0101 


1011 






4 


B 


0100 


1011 


2 


14 


0010 


1110 




< 


4 


C 


0100 


1100 


3 


12 


0011 


1100 




( 


4 


D 


0100 


1101 


2 


8 


0010 


1000 




+ 


4 


E 


0100 


1110 


2 


1,1 


0010 


1011 




1 


4 


F 


0100 


mi 


2 


1 


0010 


0001 


Logical OR 


& 


5 





0101 


0000 


2 


6 


0010 


0110 




] 


5 


A 


0101 


1010 


5 


13 


0101 


1101 




S 


5 


B 


0101 


1011 


2 


4 


0010 


0100 




* 


5 


C 


0101 


1100 


2 


10 


0010 


1010 




) 


5 


D 


0101 


1101 


2 


9 


0010 


1001 






5 


E 


0101 


1110 


3 


11 


0011 


1011 




-, 


5 


F 


0101 


1111 


5 


14 


0101 


1110 


Logical Not 


_ 


6 





0110 


0000 


2 


13 


0010 


1101 


Hyphen, Minus 


/ 


6 


I 


0110 


0001 


2 


15 


0010 


mi 




1 


6 


A 


0110 


1010 


7 


12 


0111 


1100 


Vertical Line 


, 


6 


B 


0110 


1011 


2 


12 


0010 


1100 




% 


6 


C 


0110 


1100 


2 


5 


0010 


0101 






6 


D 


0110 


1101 


5 


15 


0101 


nn 


Underscore 


>~ 


6 


E 


0110 


1110 


3 


14 


0011 


1110 




? 


6 


F 


0110 


mi 


3 


15 


0011 


nn 






7 


9 


0111 


1001 


6 





0110 


0000 


Grave accent 




7 


A 


0111 


1010 


3 


10 


0011 


1010 




# 


7 


B 


0111 


1011 


2 


3 


0010 


0011 




® 


7 


C 


0111 


1100 


4 





0100 


0000 




1 


7 


D 


0111 


1101 


2 


7 


0010 


0111 




= 


7 


E 


0111 


1110 


3 


13 


0011 


1101 






7 


F 


0111 


mi 


2 


2 


0010 


0010 




a 


8 


1 


1000 


0001 


6 


1 


0110 


0001 




b 


8 


2 


1000 


0010 


6 


2 


0110 


0010 




c 


8 


3 


1000 


0011 


6 


3 


0110 


0011 




d 


8 


4 


1000 


0100 


6 


4 


0110 


0100 




e 


8 


5 


1000 


0101 


6 


5 


0110 


0101 




f 


8 


6 


1000 


0110 


6 


6 


0110 


0110 




g 


8 


7 


1000 


0111 


6 


7 


0110 


0111 




h 


8 


8 


1000 


1000 


6 


8 


0110 


1000 




i 


8 


9 


1000 


1001 


6 


9 


0110 


1001 




i 


9 


1 


1001 


0001 


6 


10 


0110 


1010 




k 


9 


2 


1001 


0010 


6 


11 


0110 


1011 




1 


9 


3 


1001 


0011 


6 


12 


0110 


1100 





ASCII EBCDIC TRANSLATION TABLES (. . . .Cont'd) EBCDIC to ASCII (X'94" to X'F9') 



EBCDIC 


ASCII 




Charact 


Col Row 


Bit Pattern 


Col Row 


Bit Pattern 


Comments 




(In hex) 
















m 


9 4 


1001 


0100 


6 


13 


0110 


1101 




n 


9 5 


1001 


0101 


6 


14 


0110 


1110 




o 


9 6 


1001 


0110 


6 


15 


0110 


nn 




P 


9 7 


1001 


on i 


7 





0111 


0000 




q 


9 8 


1001 


1000 


7 


1 


0111 


0001 






9 9 


1001 


1001 


7 


2 


0111 


0010 




"-V/ 


A 1 


1010 


0001 


7 


14 


0111 


1110 


Tilde 


s 


A 2 


1010 


0010 


7 


3 


0111 


0011 




t 


A 3 


1010 


0011 


7 


4 


0111 


0100 




u 


A 4 


1010 


0100 


7 


5 


0111 


0101 




v 


A 5 


1010 


0101 


7 


6 


0111 


0110 




w 


A 6 


1010 


0110 


7 


7 


0111 


0111 




x 


A 7 


1010 


0111 


7 


8 


0111 


1000 




y 


A 8 


1010 


1000 


7 


9 


0111 


1001 




z 


A 9 


1010 


1001 


7 


10 


0111 


1010 




i 


C 


1100 


0000 


7 


11 


0111 


1011 




C 1 


1100 


0001 


4 


1 


0100 


0001 




B 


C 2 


1100 


0010 


4 


2 


0100 


0010 




C 


C 3 


1100 


0011 


4 


3 


0100 


oon 




D 


C 4 


1100 


0100 


4 


4 


0100 


0100 




E 


C 5 


1100 


0101 


4 


5 


0100 


0101 




F 


C 6 


1100 


0110 


4 


6 


0100 


0110 




G 


C 7 


1100 


0111 


4 


7 


0100 


0111 




H 


C 8 


1100 


1000 


4 


8 


0100 


1000 




1 


C 9 


1100 


1001 


4 


9 


0100 


1001 




> 


D 


1101 


0000 


7 


13 


0111 


1101 




J 


D 1 


1101 


0001 


4 


10 


0100 


1010 




K 


D 2 


1101 


0010 


4 


11 


0100 


1011 




L 


D 3 


1101 


0011 


4 


12 


0100 


1100 




M 


D 4 


1101 


0100 


4 


13 


0100 


1101 




N 


D 5 


1101 


0101 


4 


14 


0100 


1110 




O 


D 6 


1101 


0110 


4 


15 


0100 


nn 




P 


D 7 


1101 


0111 


5 





0101 


0000 




Q 


D 8 


1101 


1000 


5 


1 


0101 


0001 




R 


D 9 


1101 


1001 


5 


2 


0101 


0010 




\ 


E 


1110 


0000 


5 


12 


0101 


1100 


Reverse Slant 


S 


E 2 


1110 


0010 


5 


3 


0101 


0011 




T 


E 3 


1110 


oon 


5 


4 


0101 


0100 




U 


E 4 


1110 


0100 


5 


5 


0101 


0101 




V 


E 5 


1110 


0101 


5 


6 


0101 


0110 




w 


E 6 


1110 


0110 


5 


7 


0101 


0111 




X 


E 7 


1110 


0111 


5 


8 


0101 


1000 




Y 


E 8 


1110 


1000 


5 


9 


0101 


1001 




z 


E 9 


1110 


1001 


5 


10 


0101 


1010 







F 


mi 


0000 


3 





0011 


0000 




1 


F 1 


mi 


0001 


3 


1 


oon 


0001 




2 


F 2 


mi 


0010 


3 


2 


0011 


0010 




3 


F 3 


mi 


0011 


3 


3 


0011 


0011 




4 


F 4 


nn 


0100 


3 


4 


0011 


0100 




5 


F 5 


nn 


0101 


3 


5 


0011 


0101 




6 


F 6 


nn 


0110 


3 


6 


0011 


0110 




7 


F 7 


nn 


0111 


3 


7 


0011 


0111 




8 


F 8 


nn 


1000 


3 


8 


0011 


1000 




9 


F 9 


nn 


1001 


3 


9 


0011 


1001 





SEGMENT AND PAGE TABLE 



STAB (Segment table) 



Address of 
Page Table 



Address of 
Page Table 



Address of 
Page Table 



Address of 
Page Table 



Each entry in the seg- 
ment table corresponds 
to one 64K segment of 
virtual storage (Bit 31 
is invalid bit) 



One page table is 
built for each seg- 
ment of virtual sto- 
rage and contains 
32 two-byte entries 




PT (Page Table) 



Bytes and 1 : Bit 

Bits 0-12 

Bits 8-11 
Bit 13 

Bit 14 
Bit 15 



1= Address of any byte in the corresponding page 
is invalid 

Leftmost 13 bits of address of page in real 
storage if bit 13=0 

Storage key of corresponding partition if bit 13= 1 

0= Page is in real storage 
1= Page is not in real storage 

Always zero 

Used bit: 

0= Page must be read from page data set 

(a valid copy of the page is on the page data set) 
1= Page need not be read from page data set 

(no valid copy of the page on the page data set) 

Note: Bits 4-7 may contain PIK/16 of partition which requires PFIXing of the page 
currently located in corresponding page frame. The page must be PFIXed in a 
reserved page frame in the correct real partition. 

Bytes 208-211 (X'D0'-X'D3') of the System Communication Region (SYSCOM) 

contain the address of the Segment Table. 

Label STAB identifies the first byte of the Segment Table . 

Label PT identifies the first byte of the Page Table. 



PAGE QUEUE TABLE 







PGQU 










i 














c 




































/ 








Page Address 





Bits 0-3 : Bits 0-3 of PIK or TIK (if AP supported) of user task 

Bits 4-7 : B'0000' Page Translation Exception 

B'1000' Dummy Request 
B'0100' PF IX Request 
B'0010' TFIX Request 
B'0001' GETREAL Request 

Leftmost 16 bits of the address of the page (which is also the address 
of the page frame, if GETREAL) to be handled; the remaining 8 bits 
of the address are assumed to be zero 

Task identifier (PIK or TIK) of user task or, task identifier (select byte 
in STID field) of system task 



Note: Label PGQU identifies the first byte of the table 

Bytes 28-31 (X'lC'-X'lF 1 ) of the RASLINK area contain the address of the 
Page Queue Table 



PAGE FRAME TABLE 



PFT 






\ 


















Bytes and 1 : 



1234 567 



Bits 0-10: Counter for temporary fixes (tfix counter) 

Bit 1 1 : Reserved for later use 

Bit 12 s 1= PF IX request (Into another page frame) pending for the page (NFF bit) 

Bit 13 : If on, page frame is unusable (hardware failure, DRAP bit) 

Bit 14 : If 0, page frame belongs to selection pool (SP bit) 

Bit 15 : 1= PFIX (different page) or GETREAL request pending for the page frame 

(NF bit) 
Bytes 2 and 3: Pointer to next page frame in queue or to queue header if last element 

in the queue (all page frames in selection pool are queued) 

Bytes 4 and 5: If the frame is occupied: the page number (the virtual address of the 
page divided by 2048); if unused X'FFFF' 

Bytes 6 and 7: Pointer to the previous frame in the queue or to queue header if first 

element in the queue (all page frames in the selection pool are queued) 

Note: The page frame table is built at supervisor generation time and contains 

one 8-byte entry for each 2K block of real storage (page frame) as 
specified in the RSIZE parameter of the VSTAB macro. 

Bytes 212-215 {X'D4'-X'D7') of the System Communication Region 
(SYSCOM) contain the address of the Page Frame Table. 
Label PFT identifies the first byte of the table. 



PAGE FRAME TABLE EXTENSION 



For each Page Frame Table entry in the system there is a 1-byte entry in the Page 
Frame Table Extension. Each entry is a counter for the number of times a page has 
been permanently fixed in the page frame (PFIX counter) 

Bytes 216-219 (X'D8'-X'DB') of the System Communication Region (SYSCOM) 
contain the address of the Page Frame Table Extension. 
Label PFTX identifies the first byte of the table. 



1 3 4 5 7 



Byte : 
Bytes 1-3: 
Byte 4 : 



TIK (identifier of task that issued the PAGEIN macro). 
Pointer to a list of areas that are to be paged in. 



bit : 1 = PAGEIN request has been completed 

bit 1 : reserved 

bit 2 : 1 = one or more of the requested pages are outside 

the requesting program's partition 
bit 3 : 1 = one or more negative length specifications 

were detected 
bit 4-7: reserved 

Byte 5-7 : Pointer to ECB (if used) or zero . 



Note : The number of entries is determined at supervisor generation time. 
Label PAGETAB identifies the first byte of the table. 



SELECTION POOL IDENTIFIERS AND QUEUE HEADERS 





Queu 


i Identifiers 




Q00 


























HQ 


























Qll 








* 





F : Pointer to first PFT entry in queue 
L : Pointer to last PFT entry in queue 
P : Initially these pointers are as drawn. They may be changed by queue switching. 



Note: 

The Queue Headers are located directly behind the Page Frame Table. 
Each Queue Header is 8 bytes long. 

Bytes 2 and 3 contain a pointer to the first queue entry and bytes 6 and 7 
contain a pointer to the last queue entry. 



TRANSLATION CONTROL BLOCK (KB) 



CCWTCB1 (BG) 



CCWTCB2 (F4) 



Flag 
byte 


used 

by 

BTAM 


TIK/PIK 


Pointer to 
Status Modifier 
List 


Pointer to 

Control Com'd 

List 


Pointer to 
TIC line 


Pointer to 

Copy Block 

End 


Address of 
copied CCB 
(for cancel) 


Number of 
free IDA words 
in IDAL block 



CCWTCB3 (F3) 



CCWTCB (n-1) 
(subtask) 



CCWTCB (n) 
(subtask) 



Work Area's 


Address of 
last TF IX 
request 


Save Area 
(registers 2-F) 


Pointer to 

next used 

TCB 



If fast CCW translation is specified 
(FASTTR=YES), bytes 52-131 are 
changed to: 



Pointer to 
DIDAL chain 


Address of 
current 
DIDAL 


Number of 
DIDAL's 


Number of 
free DIDAL 


Address of 
DIDAL entry 



Virtual 
CCW 
address 


Save Area 
(Registers 2-F) 


Pointer to 

next used 

TCB 



TRANSLATION CONTROL BLOCK (TCB) 



Byte 1: 



Bytes 4-7: 



bit 0=1: data chaining specified 

1 = 1: Read/Sense command specified 

2=1: Read backward command specified 

3=1: Status modifier command with data chainin 

4=1: Status modifier command only 

5-6 : Reserved 

7=1: REPLICA creation flay (fast CCW translatic 

Number of copy blocks needed in addition to those 
required for current CCW-translation request. 

Pointer to Status Modifier List belonging to handled 
device. Zero if device does not support Status Modifie 
commands . 



Bytes 8-1 1 : Pointer to Control Command List belonging to 

handled device. Zero if device does not support 
Control Commands with data area. 

Bytes 12-15: Chain of knots of tree structure caused by TIC 

following Status Modifier command. Zero if no 
knots exist in CCW chain. 

Bytes 16-19: Chain of knots build because Status Modifier 

command is last one fitting in CCW copy block. 
Zero if no Status Modifier commands at end of 
CCW copy blocks. 



Note: One TCB is generated for each partition supported. With asynchronous processing support 15 TCB's are generated . 

To locate the TCB (associated with the partition/task), add X'50' to the address of the System Save Area (displacement X'09 1 of the appropriate PIB). 
Labels CCWTCB 1- CCWTCBn identify the first byte of the appropriate TCB. 



COPY BLOCKS 

The copy blocks are located at the end of the supervisor nucleus. 
Each block is 72 bytes long and is used to store one of the following: 

• One CCB plus some additional information (CCB copy block), or 

• Up to seven copied CCW's and pointers (CCW copy block), or 

• One or more Indirect Data Address Lists (IDAL block). 

Chains are formed for both the occupied and the free copy blocks. The occupied blocks 
are chained by means of pointers in the CCB copy blocks. The address of the first CCB 
copy block in the chain is contained in the field ACCBB, which is located at the be- 
ginning of the channel program translation routine (CCWTADR). 

The address of CCWTADR is contained in the System Communication Region (SYSCOM), 
bytes 132-135 (X'&M'-X'o?'). 

The free copy blocks are chained by means of pointers in the copy blocks. The address 
of the first copy block in the chain is contained in the first AFCB. 



VIRTUAL STORAGE 



REAL STORAGE 



I/O Area's 




A(2nd part) [ page 

I boundary 




Note: The DIDAL and REPLICA blocks are created by the fast CCW translation routin 
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COPY BLOCKS (....Cont'd) 
Layout of CCB Copy Block 





| , 


2 


3 


4 


5 


6 


7 







CCBCNT 


CCB 
COM1 


CCB 
COM2 


CCB 
STA1 


CCB 
STA2 


CCB 
CLS * 


CCB 
LNO 


f 


8 


CCBCCW 

Address of first CCW 


CCBBY3 


CCBCSWW 


o 
Q 
i 


16 


CCBSENS 

Sense CCW if any 




24 


CCBPIK 
User PIK 


CCB 
FLAG** 


Unused 


CCBVA 

Virtual Address of CCB 




32 


CCBACB 

Address of first CCW copy block in 

channel program 


CCBICB 

Address of first IDAL block in channel 

program 




40 
48 

56 


CCBXINF (Fix information; 24 bytes) 

Each bit in this field represents one page frame. 

If a bit is on, the associated page frame contains 

a page fixed for this I/O request. If more than 

384K of real storage are available, the address 

. in CCBXPTR will point to any additional field 

which contains bits for the page frames beyond 384K 




64 


CCBXPTR 

Address of additional Fix information 


CCBNEXT 

Address of next CCB copy block 





If fast CCW translation is specified 



(FASTTR=YES), the last twelve 
bytes of the block are changed to: 


CCBRCB 

Address of REPLICA block 


CCBFPT 

Forward chain pointer 


CCBBPT 

Backward chain pointer 



Set to X*20' (=copied CCB) 

* Legend CCBFLAG: Bit 0: Indicates that CCW-translation of this request 
is complete; indicator is set before I/O request 
is enqueued in channel queue. 

1: Indicates that at least one time during CCW- 
translation control has been transferred to 
TFIX routine. 

in case TTFIX is scan through CCBXINF for 
freeing pages is skipped. Indicator is set 
Immediately before control is transferred to 
TFIX routine. 

2: Unused. 

3: Indicates that the next CCW-translation request 
from BTAM is from the BTAM channel appendage. 
This indicator is set immediately after 1st time 
request from BTAM has been completed. 

4: Valid for fast translation. 

5: CCB copy block is on saved CCB queue. 

6: Data area pages require fixing. 

7: Unused . 
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COPY BLOCKS ( 



Layout of CCW Copy Block 



1st Copy location for CCW 



2nd Copy location for CCW 



3rd Copy location for CCW 



4th Copy location for CCW 



5th Copy location for CCW 



6th Copy location for CCW 



7th Copy location for CCW 



Virtual address of first CCW ir 
Copy block 



Address of next CCW Copy block i 
the chain 



X'80' indicates the end of the CCW copy locations in the block. 

It is replaced by a TIC (Transfer in Channel command) if the 7th copy 

location contains a copied CCW with data- or command chaining. 

Bytes 57-59 will then point to the copy location of the CCW following 

the CCW in the 7th copy location. 

Bytes 56-59 will not be changed if the CCW in the 7th copy location 

is a TIC. 



X'88' indicates the last 8-byte entry in the block. It is replaced by a 
TIC if the CCW in the 7th copy location is a status modifier CCW. 
Bytes 65-67 will then point to the copy location of the second CCW 
following the status modifier CCW. 



MAIN REPLICA BLOCK 










VCCBA 


RCCBA 


TIMTEST 


REPPIK 


REPLCNT | CCWSTRL 


REPDIDAL 


REPDCB 





CCB 
(16 or 24 Bytes) 






CCW1 


CCW2 


CCW3 


REPFPT | REPBPT 


1 


REPNEXT 



ADDITIONAL REPLICA BLOCK 




Legend: 

VCCBA - Virtual CCB address 

RCCBA -Address of copied CCB 

TIMEST - Timestamp 

REPPIK - Partition Identification Key 

REPLCNT - The number of tasks currently testing this REPLICA 

for a match with their channel program 

CCWSTRL - Length of CCW string (number of CCW's) 

REPDIDAL -Address of DIDAL block 

REPDCB - Pointer to chain of DIDAL blocks 

REPFPT, REPBPT - Pointers used for chaining REPLICA's 

(forward and backward pointer) 

REPNEXT - Pointer to (next) additional REPLICA block 



DIDAL ENTRY 



VIRTUAL ADDRESS 


FLAG 
BYTE* 


POINTER TO 
REAL LOC. ** 



FLAGBYTE: bit - indicates that TFIXing is not 
is not neccessary because the 
page has already been TFIXed 
for this request, 
bit 7 - indicates that TFIX request for 
this entry has been completed. 

Real location (either copied CCW or IDA word) 
that should contain the translated (/O area address. 

Points to (next) additional DIDAL. 
Contains 4X'0O' in last DIDAL. 



BOUNDARY BOX 





BBOX 


"§ °z 


General Entry 


2.2! 


BG Entry 


ai-s 


Fn Entry 






F2 Entry 


Fl Entry 



IV 



S 1 

1 


End Address of Real Storage 


Number of 


Number of 






or Address of PDAID 


Page Frames 


Page Frames 


Begin Address of 


End Address of 





alternate area/ SDAID 


in smallest 


in Main Page 


Virtual Address Area 


Virtual Address Area + 1 


r 


buffer area 


Real Partition 


Pool 







Begin Address of 
Real Partition 


End Address of 
Real Partition + 1 


Begin Address of 
Virtual Partition 


End Address of 
Virtual Partition + 1 


1 These values are inserted at IPL time and (except 
1 Geaentry) may be changed by ALLOCR 


These values are inserted at system generation time l 
and (except Gen.entry) may be changed by ALLOC 1 



Notes: If a partition is not allocated, its-beginning- and end address are identical with the beginning address of the following partition. 

Bytes 220-223 (X'DC'-X'DF') of the System Communication Region (SYSCOM) contain the address of the Boundary Box. 
Label BBOX identifies the first byte of the table. 



CONVERTING VIRTUAL TO REAL ADDRESS 



*EC PSW- 



Instruction Address 
9 B[ 6 | 



Segment 



it no . Page no . Byte Dii 

1011 0110 0300 00C 

n J. * r k 



'splacement 



1001 



110 0110 11:00 



STOR 

Control Register 1 |~ 

|0B006.F40| 



SEGMENT TABLE 
Segment (X'06 1 ) 



E000C000 

Segment 1 (X'01') 



Segment 2 (X'02') 



Segment 153(X'99') 



Segment 154(X'9A' 





PAGE TABLE 


■X'COOO' 




-X'E680' 


Page (X'OO 1 ) 




Pagel (X'Ol 1 ) 








Pagell(X'OB') 
0469 


XJjdW 


Page 12(X'0C") 
0329 


l8j 


Page 13(X'0D') 
0579 








Page30(X'lE') 




Page 31 (X' IF') 









32 PAGE - 
entries [ll] 
for one(l) 
64 K Segment 



XV1AC (X'6F40'+X , 26C') 



Qo] 



I 0000 0011 0010 IjOQl | -4 
£ 12, 



Page Table Entry 



| 0000 0011 0010 IjOOO 0000 oooo I 
|5 V2l3 23| 



X '032800' 



DU 



Note : Values used in the figure are hypothetical . 



PAGE DATA SET FORMAT 



Virtual Disk Format 3330 





« 

2048 bytes 


2048 bytes 


12288 by 
2048 bytes 


es 

2048 bytes 


2048 bytes 


► 

2048 bytes 


- Head 
x 00 
X 

1 ^ 


X'OOOO' 


X'0800' 


X'1000' 


X'1800' 


X'2000' 


X'2800' 


X'3000 ' 












!•*<. ° 2 


X'6000' 












X 5 






6 x X'800' = 
( 1 tr 


X'3000' bytes 
ack) 






f ,8 


X'36000' 










X'38FFF' 



Virtual Disk Format 3340 





^ 

2048 bytes 


6144 bytes 

2048 bytes 


J*- 

2048 bytes 


OHead 
x 00 


X'OOOO' 


X'0800' 


X'1000' 


m 01 
8 


X'1800' 






fi 02 


X'3000' 






ii i 
x^ 




3 x X'800* = X'1800' bytes 
( 1 track) 




1 11 


X' 10 800' 




X'llFFF' 



PAGE DATA SET FORMAT (....Cont'd) 



Virtual Disk Format 2314 





4 


6144 bytes 


► 










Head 
00 


X'0000' 


X'0800' 


X'1000' 


01 


X'1800' 






02 


X'3000' 










3x X'800' = X'1800' bytes 
( 1 track ) 




19 


X'1C800" 




X'IDFFF' 



- 1 cylinder : 20 x X'1800' bytes = X'lEOOO' bytes 



Virtual Disk Format 3350 











, ... , 












— ► 


2048 


<~ 




Head 
00 


X'0000' 


X'0800' 


X'1000' 


X'1800' 


X'2000' 


X'2800' 


X'3000' 


X'3800' 




01 


XM000' 


















02 


X'8000' 


















fc 


^ 




8x X'80 
(1 


0'= X'4 
track ) 


DOO'byte 






H 


^ 


29 


X74000' 














X77FFF' 





RESOURCE USAGE RECORD TABLE (RURTAB) 



- E 
9- s - 



SYSPL 


=RUR for Proc. Library 




SYSOPEN 


=RUR for VSAM Open 
routine 




SYS LB L 


=RURfor Label Cylinder 




SYSRES 


=RUR for IJSYSRS File 




SYSIXL 


=RUR for VSAM Index 
Build 


Format of 


SYSSPM 


=RUR for VSAM Space 
Manager 




Ownership bifs-, . , 






1 


2 


3 




SYSMCO 


=RUR for VSAM Master 
Catalog Routine 








1 OwnershiD 


bits 




for 


Job Control 


SYSCTLG 


=RUR for VSAM Master 
Catalog 




39S 






SYSVTOC 


-RUR for all VTOG 




SYSSPLIT 


=Used for VSAM 




SYSSCB 


=Used for VSAM 




Dummy RUR indicating 
'pool exhausted' 


8 bytes 


/ \ 


RUR for a Named Resource 

(Pool for RURs of Named R 


Unique Name of a Named Resource 
ssources) 


j 




"- 


-- 



RESOURCE USAGE RECORD TABLE (RURTAB) (...Cont'd) 



Bit 3: 1= Another task waiting for this resource 

Bit 5: 1= Resource shared among owners indicated 

Bit 6: 1= Resource used exclusively by indicated task 

Bit 7: 1= Shared or exclusive use of resource 

Byte 1 : Used by Job Control to indicate that the resource is to be held for the 
duration of a job. 



Bit 


: 1= TIK or PIK Is 


X'70' 








Bit 1 


: 1= TIK or PIK is 


X'60' 








Bit 2 


l = TIKorPIK is 


X'50' 








Bit 3 


l = TIKorPIK is 


X'40' 








Bit 4 


l=TIKorPIK is 


X'30' 








Bit 5 


l=TIKorPIK is 


X'20' 








Bit 6 


1= TIK or PIK is 


X'10' 








Byte 


2: 




Byte 


3_i 




BitO 


1=TIK isX'FO' 




BitO 


1= TIK or PIK 


s X'70' 


Bit 1 


1 = TIK is X'EO' 




Bit 1 


1=TIK or PIK 


s X'60' 


Bit 2 


1 = TIK isX'DO' 




Bit 2 


1=TIK or PIK 


sX'50' 


Bit 3 


1=TIK isX'CO' 




Bit 3 


l=TIKorPIK 


s X'40' 


Bit 4 


1=TIK is X'BG" 




Bit 4 


1=TIKorPIK 


sX'30' 


Bit 5- 


1=TIK is X'AO' 




Bit 5 


1=TIKorPIK 


s X'20' 


Bit 6 


! = TIK isX'90' 




Bit 6 


l=TIKorPIK 


s X'10' (BG) 


Bit 7 


]=TIK is X'80' 




Bit 7 


1=TIK or PIK 


s X'OO' (Attention) 



For explanation of TIK and PIK see Task Interrupt Key and Partition 
Identification Key. 

Label RURTAB identifies the first byte of the table. 



AN COR TABLE (ANCHTAB) 



*-4 bytes 



End address 
of Anchor 
Table 



Used for VSAM 
AMCBS pointer 



-4 bytes •■ 



Used for VSAM 
OAL pointer 



1st Entry 



2nd Entry 



format of 


7 


8 11 


12 15 


16 19 




any entry 


Phase 


Load 


Entry 


Length 






name 


point 


point 


of phase 




/ 
/ 


Byte 16: 




/ 


Status Switch 


X'OO' = Phase must be loaded 


/ 


X'7F' = Phase is already in storage 


/ 


X'FF' = Requested phase is just loaded 






by another task (only is AP=YES) 



The Anchor Table is located at the beginning of the GETVIS area in the virtual partition. 



LAYOUT of SHARED VIRTUAL AREA (SVA) 





0. 


, 3 


4 ... 7 







VLT 




8 


VDSA 


VLSA 




10 


VLNA 


VLEA 




18 




TB 




20 












V 


D ss 








! AL 






2 VL j: 






- GV s 





Field 


Length 


Content 


VLT 


8 


Date + time SVA has been 
updated (note 1) 


VDSA 


4 


Start address of the System D 
Directory List 


VLSA 


4 


Start address of the virtual 
library (note 2) 


VLNA 


4 


Address of next available 
location in SVA 


VLEA 


4 


Address of end of the SVA 


TB 


10 


Communications area for 
Job Control and $MAINDIR 


VD 


up to 32 K 


System Directory List 

(note 3) 


AL 


<8 


Alignment bytes for doubleworc 
boundary 


VL 


any 


Virtual library containing re- 
entrant and relocatable phases 


GV 


any 


GETVIS area for the system 
(starts on page boundary) 



Note 1 : As one of the tests to determine whether a warm start copy of the SVA is 
available, job control compares this entry after IPL against the date and 
time in the SCIL descriptor entry. 

Note 2 : Address of first doubleword aligned byte after SDL. 

Note 3 : The layout of this area is compatible with a directory block in the Core 
Image Library. The SDL has fixed length entries of 34 bytes. The last 
entry contains 8X'FF' as phasename. 



FETCH TABLE (FTTAB) 



layout 
of any 
entry in 
Fetch 
Table / 






1 3 


4 5 


6 7 


8 13 


14 1< 


c 


A(SLD) 


TC 


BT 


Cataldir 


Linkdir 



ByteO 



Bytsl-3 : 

Bytes 4-5: 
Bytes 6-7: 
Bytes 8-13: 



Condense counter (incremented for each condense of the 

library . Reset to zero when a new library is assigned - 

PCILonly) 

Address of the corresponding Second Level Directory 

(zero if no SLD present) 

Number of tracks per cylinder 

Number of library blocks per track 

Address of directory of cataloged phases in the form 

BBCCHH 

Address of Linkarea in the form BBCCHH (zero if no 

Linkarea present) 



Note : The address of the FETCH TABLE is contained in bytes 240-243 (X'FO'-'FS 1 ) 
of the System Communication region (SYSCOM) . 
Label FTTAB identifies the first byte of the table. 

* The entries for the partitions will not exist if the support for Private Core 
Image Libraries is not included in the Supervisor. 



LAYOUT of DIRECTORY ENTRY 



7 8 10jnjl2 1*I4ldl<17 



20121 2312425)2427 29J3C 31 33 



Bytes 0-7 


• Phase 


name 


Bytes 8-10 


TTR 


Relative track address and record number of phase (note 2) 


Byte 11 


N 


Number of halfwords containing user data 


Bytes 12-13 


TT 


Number of text blocks 


Bytes 14-15 


LL 


Number of text bytes in last text block 


Byte 16 


• 1 


Switch indicating type of phase 
X'80' : selfrelocating phase 
X'40' : relocatable phase 
X'20' : SVA eligible 
X'10' : phase is in the SVA (note 1) 
X'08' : phase found in a PCIL (note 1) 
X'04" : phase not found (note 1) 
X'02' : active entry (filled in) 
X'Ol ' : not used 


Byte 17 


T 


Always X'OO' (used as type byte for stow table) 


Bytes 18-20 


PPP 


Load point at LNKEDT time (note 3) 


Bytes 21-23 


EEE 


Entry point at LNKEDT time (note 3) 


Bytes 24-25 


RR 


Number of RLD items (note 4) 


Byte 26 


R 


Number of additional RLD blocks (note 4) 


Bytes 27-29 


AAA 


Partition start address at LNKEDT time (note 4) 


Byte 30 


C 


Condense counter at the time when entry was 
activated (note 6) 


Bytes 31-33 


VEE 


Entry point of phase in SVA (notes 1 and 5) 



Note 1 : Only used for directory entries that are in storage . 

Note 2 : The TTR is relative to the beginning of the directory. 

Note 3 : PPP and EEE are not present if both are zero and the phase is not relocatable. 

Note 4 : RR, R and AAA are only present if the phase is relocatable. 

Note 5 : VEE is only present if the phase is SVA eligible. 

Note 6 : Condense counter is used for incore directory entries (not SDL) 



Note : The last entry in the directory is a 12-byte entry with a dummy phasename 

(contains 8X'FF'), a dummy TTR (contains XL3W) and a dummy N (contains 
X'OO') . Directory entries in storage always have the standard length of 34 
bytes (including the last entry). 



RELATIONSHIP between DIRECTORY and its SECOND LEVEL DIRECTORY 



Second Level Directory 





NN 


fe 




HN1 


Directory 




TRACK 1 


HN2 




» 


HN3 


'"" w 


TRACK 2 












TRACK 3 








TRACK 4 




TRACK 5 









Field 


Length 


Content 


NN 
HN 


2 

8 


Number of entries 
Highest phase name on 
corresponding directory track 



Note : Track 4 and 5 are not used. 



DIREqORY SEARCH SEQUENCES (INCLUDING SDL CONSIDERATION) 





Options 


Directories 




SDL 


o ' 
LDL 


SYS 


I 1 

• PCIL ■ LINK 


SLD 


SCIL 
LD 


PSLD 


PCIL 
LD 


DE 
LDL 


SDL 


1 


No 
No " 
No " 


No 
No 
No 


No 
No 
No 


No ' No 
"No " Yes" 
"Yes No 


1 
2 


1 




' 




2 


■ --"T-— - 


-" : 


3 


2 


2 


1 


4 


No 


No 


No 


Yes Yes 


3 

T 
1 


2 ... V'...T~"".. 


5 


No 


No 


Yes 


No No 


6 


No 


No 


Yes 


No Yes 


7 


No 


No 


Yes 


Yes No 


l 




2 

2 3 ■ 




8 


No 


No 


Yes 


Yes Yes 


l 


9 


No 


Yes 


No 


No No 


2 \\ 




10 


No 


Yes 


No 


, No . Yes 


3 


2 






11 


No 


Yes 


No 


Yes 1 No 


3 




2 : r 




12 


No 


Yes 


No 


Yes 1 Yes 


4 




3 2 1 




13 


No 


Yes 


Yes 


No No 


2 








14 


No 


Yes 


Yes 


: No } Yes 


2 


3 






15 


No 


Yes 


Yes 


: Yes ! No 


2 


3 1 




16 


No 
Yes" 


Yes 
No 


Yes 

No 


\ Yes j^Yes 

No J No 


2 

2 -- 





3 4 






17 








1 
2 


18 


Yes 


No 


No 


No ; Yes 


["3 


n 




19 


Yes 


No 


No 
No 


Yes i No 


3 


i 


2 


20 


Yes 


No 


: Yes | Yes 


4 


2 1 


3 


21 


Yes 


No 


Yes 


' No ! No 


2 




L 1 


22 
23 


Yes 

Yes " 

Yes 

Yes 

Yes 

Yes" 

Yes 

Yes 

Yes 


No 

No ] 
No 
Yes 
Yes .._ 
Yes 
Yes 
Yes 
Yes " 


Yes 
Yes 
Yes 

No 
No 
No 
No 
Yes ~ 


No j Yes 
' Yes ' No 


2 
"2 


3 


3—- :■■■;■ 


1 
1 


24 
25 
26 
27 


Yes | Yes 
( No i No 
* No ' Yes 
"Yes * No 
' Yes Yes 


2 

" 3" 
4 

4 ■--■ 

5~'"~ 


2~" 


_3 

2 
3 


4 

: 1 " 

i 1 

T] 


1 

3 

3 ~ 


28 


2 ! 1 

— ri ' 


4 
2 -- 

2 
r 2 


29 


No No 


3 






30 


Yes 


No Yes 


3 


4 




31 


Yes 
Yes 


Yes 
Yes 


Yes 

Yes " 


Yes No 


3 




4 ] ; 1 


32 


Yes j Yes 


3 


I 4 1 5 1 ' 


2 



VTAM ADDRESS VECTOR TABLE (1STAVT) 



Label 


Length 


Description 


ISTACVT 


4 


Address of Communications vector table in VTAM 
partition 


ISTAS49 


4 


SVC 49 code routine address 


ISTAS53 


4 


SVC 53 code routine address 


ISTAPSTA 


4 


Address of APS table 


ISTTXTSZ 


4 


Address of size of text record 


ISTAPSEX 


4 


Address of APS disposition exit 


ISTPHNM 


5 


Phase name 


ISTX1 


1 


Used for TOLTEP to save the condition code 


ISTARID 


2 


Address of RID 


ISTATRT 


2 


Address of VTAM gates in resource table 


ISTAGTWT 


2 


Address of gatewait routine 


ISTVTTP 


2 


Address of SVC 1 1 routine 



Bytes 96-99 (X'60-X*63' ) of the system communication region (SYSCOM) contain 
the address of the VTAM Address Vector Table. 



ENTRY IN THE ASYNCHRONOUS PROCESS SCHEDULER (APS) OPTION TABLE 



Label 


: Length 


1 Description 


APSFLAG 


1 


: X'80' =Exit requested 




11 


' Reserved 


VTAMFLAG 


: i 


; X'01 ' = Subtask runs in supervisor state 
1 X'04" = VTAM SVC active 
! X'02' = VTAM appendage active 
j X'08" = VTAM user exit in control 
' XMO' = VTAM timer delay 




; 3 
1 


Reserved 



ROUTINE IDENTIFIERS (RID) 



NAME 


ID 


MEANING 


ACTION 


SYSTEMID 


00 


System error condition, for 
example, page fault in I/O 
interrupt handler 


Hard Waif 


REENTRID 


04 


Page fault or GETREAL request 


Save PSW and regs to 






in a reenterable routine 


user task 's system save 
area, set PIB DAT 
flag to call 
SVRETURN, and 
ENQU request 


USERTID 


08 


Page fault from a disabled user 


Cancel user task error 






task or disabled B-transient 


codeX'15'. 


APPEND ID 


OC 


Page fault in I/O appendage 


Cancel usertask error 






routine 


code X'36'. 


RESVCID 


10 


Page fault in SVC 29 or 47 


Set saved PSW to re- 
issue SVC when task 
is dispatched, ENQU 
page fault request. 


DISPID 


14 


Page fault in a routine which 


ENQU page fault 






requires no information to be 


request. 






saved, for example, a page 








fault in the dispatcher. 




PFARID 


16 


Page fault in a page fault 


Cancel user task error 






appendage routine 


codeX'15'. 




47 


Request for a page which is to 


Save PSW and registers 




thru 


be PFIXed. RID identifies the 


to user task's system save 




4F 


partition which issued the PFIX 


area, set PID DAT flag 






request. Used only if AP=YES. 


to call IN ITS VC when 
task is dispatched next. 


G41BND 


53 


Page fault in the reusable 






SVC 41 or 42. 


Close gate to routine 
(routine cannot be used 


G58BND 


71 


GETREAL request from the 






reusable SVC 58. 


until gate is opened). 
ENQU page request. 
(Any task trying to use 
a gated resource is 
placed in a wait state 
and marked resource 
bound. It is released 
from the wait state 
when the resource is 
ungated after the page 
request has been 
handled.) 



CHAPTER V 

DOSAS SERVICE AIDS 



System Generation Requirements 

The following System Generation macro parameters apply to PDAIDS: 



Macro 


Parameter 


Remarks 


FOPT 


(NO| 
PD=<YES> 


The PD parameter must be specified if the problem deter- 
mination programs (PDAIDS) are desired. 
PD= YES specifies that a minimum of 1400 bytes is reserved 
for this function. Any amount between 1400 and 10,240 
bytes may be specified for n. 



The PDAIDS routines must be catalogued in the Core Image Library. 
Linkage Edit statements: 

INCLUDE IJBPDAID 
/* 
// EXEC LNKEDT 

INCLUDE IJBPDLST 
/* 
// EXEC LNKEDT 



INITIALIZATION 

After linkage editing PDAIDS routines into the Core Image Library, the initializer 

program is loaded with standard DOS/VS [ob control statements. 

The statement: // EXEC PDAID causes the initializer to be loaded. The initializer 

types out the first keyword PDAID= and opens the keyboard for a response. 

A choice can be made at this point to enter the parameters from the printer keyboard 

or from SYSIPT via cards. Following is a description of each of these methods: 

Initialization via card: 



1 Punch desired keywords and parameters into cards. (See PDAID control state- 
ments table for the appropriate PDAID functions, in this chapter). 

Entries may be punched one- per- card, or multiple entries(separated by commas) 
can be made in a single card. An entry may not be split between two cards. 
All 80 columns of a card may be used, but a card is terminated by the first blank 
following an entry, or a GO entry. The last entry of the last card must be GO 
and the last card must be followed by a /* card. 

2 Place keyword entry card(s) in SYSIPT. 

3 Respond to the SYSLOG message PDAID= by pressing only the END key on the 
printer keyboard. 

4 The initializer reads cards from SYSIPT until the GO entry is encountered. 
Note : If a wrong parameter is encountered on a card, corrections are requested on 

SYSLOG. 



Initialization via printer keyboard 

1 Enter one of the parameters (IT,FT,TD,GT, QT, VT or VP) indicating the 
specific PDAID function you want to initiate. 

2 The initializer will respond with the next keyword: 

Respond with the appropriate parameter 
(See PDAID control statements table for the appropriate PDAID functions, 
in this chapter). 

The initializer will continue to prompt with the appropriate keywords until 
all options have been satisfied or a GO response is received, whereupon 
defaults are selected for any remaining options. 

Pressing the END key in response to any keyword causes selection of the 
default option and causes the initializer to respond with the next option 
available. 

4 The sequence in which keywords are prompted depends on previous responses. 
Because AAA is valid only in core-wrap mode, it does not occur unless the 
response to "OUTPUT DEVICE= " is END(key). (which selects core-wrap 
mode by default). 

Because "IGNORE DEVICE/SVC= " and "TRACE DEVICE/SVC= " are mutually 
exclusive, 'TRACE DEVICE/SVC= " is prompted only after a default response 
to "IGNORE DEVICE/SVC= " . 

TERMINATION 



Any PDAID function can be terminated by re-initializing the PDAID program with 

the job control statement: //EXEC PDAID 

and responding to the message PDAID with XX. 

It is also possible to reset one function by loading another. 

Note: If the PDAID function is terminated and an alternate area was assigned for 
core-wrap mode before this area is released to the main page pool, the 
contents of this area is printed on SYSLST. 

If SYSLST is unassigned,the printout of this area is suppressed and the 
content of this area will be destroyed. 



PDAID FUNCTIONS 



1 I/O Trace 



SYSLOG message 


SYSLOG response 


Meaning 


Default 


SYSIPT parameter 


SYSIPT operand 


PDAID= 


H 


IT: Initiate I/O trace 
XX: Terminates 


None 

Function 

continues 


OUTPUT DEVICE= 
(note 1) 




cuu 1 
XWl 
END [ 
GO J 


Specif iy the hexadecimal channel 
and unit number of either a mag- 
netic tape unit or a printer for 
the output device of the PDAID. 


Core -wrap 
mode 


AAA= 
(note 1) 


Bl 


nK: Specifies the number (n) of 
"K" bytes to be allocated as al- 
ternate area for core-wrap mode .* 
The value n must be an even inte- 
ger. If not an even integer, n+l is 
taken. 

*) This area will be taken from 
the main page pool. 


Core -wrap 
mode, 
using PD- 
save area 



1 I/O Trace ( Continued) 



SYS LOG message 


SYSLOG response 


Meaning 


Default 


SYSIPT parameter 


SYSIPT operand 




IGNORE DEVICE= 


[fcuu i] 




Specify the hexadecimal channel 


Trace all 


(note 2) 


IX'cuu'l 
|END [ 

.[go J 




and unit number of the device to 
be ignored by I/O trace. 
Note: A maximum of 3 may be 


devices 






specified. 




TRACE DEV1CE= 


rfcou ) 




Specify the hexadecimal channel 


Trace all 




Ix'cuu'l 




and unit number of f he device to 


devices 




(END [ 




be traced by the I/O trace. 






(go J 




Note: A maximum of 3 may be 








specified. 




GO (valid 








SYSIPTparameter) 




GO terminates the PDAID con- 
trol input and uses the default 
for those options that are not spe- 
cified. 


None 



Note 1: 
Note 2: 



OUTPUT DEVICE and AAA are mutually exclusive. 

TRACE DEVICE and IGNORE DEVICE are mutually exclusiv 



2 Fetch/Load trace 



SYSLOG message 


SYSLOG response 


Meaning 


Default 


SYSIPT parameter 


SYSIPT operand 


PDAID= 


&} 


FT: Fetch/Load trace 
XX: Terminates 


continues 


OUTPUT DEVICE= 
(note 1) 


' END [ 
.GO J 


Specify the hexadecimal channel 
and unit number of either a mag- 
netic tape unit or a printer for 
the output device of the PDAID. 


Core -wrap 
mode 


AAA= 
(note 1) 


HI 


nK: Specifies the number (n) of 
"K" bytes to be allocated as al- 
ternate area for core-wrap mode.*) 
The value n must be an even in- 
teger. If it is not an even integer, 
n+1 is taken. 

*) This area will be taken from 
the main page pool. 


Core -wrap 
mode, 
using PD- 
save area 


TRACE 
PARTITION= 


l 5 l 

END 

HgoJJ 




SP: Supervisor 
BG: Background 
Fn : Foreground n 


Trace all 
partitions 
and the 
supervisor 



Fetch/Load Trace ( Continued) 



SYSLOG message 


SYSLOG response 


Meaning 


Default 


SYSIPT parameter 


SYSIPT operand 


GO (Valid 
SYSIPT parameter) 




GO terminates the PDAICtontrol 
input and uses the default for 
those options that are not speci- 
fied. 


None 



Note 1: OUTPUT DEVICE and AAA are mutually exclusive 



SYSLOG message 


SYSLOG response 


Meaning 


Default 


SYSIPT parameter 


SYSIPT operand 


PDAID= 


m 


GT: GSVC trace 
XX: Terminates 


f^cL 


OUTPUT DEVICE= 
(note 1) 


]END f 

[go J 


Specify the hexadecimal channel 
and unit number of either a mag- 
netic tape unit or a printer for 
the output device of the PDAID. 


Co re -wrap 


AAA= 
(note I) 


JnK 1 
{ END> 

[go J 


nK: Specifies the number (n) of 
"K" bytes to be allocated as al- 
ternate area for core-wrap mode.*) 
The value n must be an even inte- 
ger. If it is not an even integer, 
n+1 is taken. 

*) This area will be taken from 
the main page pool. 


Core -wrap 

using PD- 
save area 


TRACE 
PART IT 1 ON = 


END 
l GO J. 




SP: Supervisor 
BG: Background 
Fn : Foreground n 


Trace all 

and the 
supervisor 


IGNORE SVC= 
(note 2) 


H 


Specify the hexadecimal SVC num- 
ber to be ignored by the GSVC 
trace. Amaximum of 6 may be spe- 
cified. 


Trace all 
SVC's 


TRACE SVC= 
(note 2) 


H 


Specify the hexadecimal SVC num- 
ber to be traced by the GSVC 
trace. A maximum of 6 may be spe- 
cified. 


SVC's 


GO (valid 
SYSIPT parameter) 




GO terminates the PDAID control 
input and uses the default for 
those options that are not speci- 
fied. 


None 



GSVC Trace ( Continued) 



Note 1: OUTPUT DEVICE ond AAA are mutually exclusive. 
Note 2: TRACE SVC and IGNORE SVC are mutually exclusiv 



SYS LOG message 


SYSLOG response 


Meaning 


Default 


SYSIPT parameter 


SYSIPT operand 


PDAID= 


{£} 


QT: QTAM Trace 
XX: Terminates 


None 
continues 


OUTPUT DEVICE= 
(note 1) 


|END [ 
IGO J 


Specify the hexadecimal channel 
and unit number of a magnetic 
tape unit for the output device 
of the PDAID. 

Note: A printer is invalid for 
QTAM trace . 


Core-wrap 
mode 


AAA= 
(note 1) 


fnK | 

{end} 
IgoJ 


nK: Specifies the number (n) of 
"K" bytes to be allocated as al- 
ternate area for core-wrap mode.*) 
The value n must be an even in- 
teger. If it is not an even integer 
n+1 is taken. 

*) This area will be taken from 
the main page pool. 


Core -wrap 
mode, 
using PD- 
save area 


TRACE 
PARTITION= 


61 

END 
l G °J. 




SP: Supervisor 
BG: Background 
Fn : Foreground n 


Trace all 


IGNORE DEVICE= 
(note 2) 


]END f 
iGO J 




Specify the hexadecimal channel 
and unit number of the device to 
be ignored by the QTAM trace. 
A maximum of 3 may be specified. 


Trace all 
devices 


TRACE DEVICE= 
(note 2) 


]END f 
.IGO J 




Specify the hexadecimal channel 
and unit number of the device to 
be traced by the QTAM trace. 
A maximum of 3 may be specified. 


Trace all 


GO (valid 
SYSIPT parameter) 




GO terminates the PDAID control 
input and causes the default for 
those options that are not speci- 
fied. 


None 



Note 1: OUTPUT DEVICE and AAA are mutually exclusive. 

Note 2: TRACE DEVICE and IGNORE DEVICE are mutually exclus 



SYSLOG message 
SYSIPT parameter 


SYSLOG response 
SYSIPT operand 


Meaning 


Default 


PDAID= 


W 


VT : VTAM Trace 
XX : Terminates 


None 

Function 

continues 


OUTPUT DEVICE= 
(note 1) 


[cuu ] 
J X'cuu'l 
]END | 
[GO J 


Specify the hexadecimal channel 
and unit number of a magnetic 
tape unit for the output device 
of thePDAID. 

Note : A printer is invalid for 
VTAM trace. 


mode 


AAA= 
(note 1) 


fnK | 
<END> 
IGOJ 


nK : Specifies the number (n) of 
"K" bytes to be allocated as al- 
ternate area for core -wrap mode. * 
The value n must be an even in- 
teger. If it - is not an even integer 
n+1 is taken. 

*) This area will be taken from 
the main page pool. 


Core -wrap 
mode, 
) using PD- 
save area 


TRACE 
PARTIT!ON= 




]end[ 
l GO X 




SP: Supervisor 
BG: Background 
Fn : Foreground n 

Only SVCs 49 and 53 are 
recorded per partition 


Trace all 
partitions 
and the 
supervisor 


IGNORE DEVICE= 
(note 2) 


L 


cuu 1 
X'cuu'l 
END f 
.GO J 




Specify the hexadecimal channel 
and unit number of the device to 
be ignored by the VTAM trace. 
A maximum of 3 may be specified. 


Trace all 
devices 


TRACE DEVICE = 
(note 2) 


Ffcuu |1 
j J X'cuu'l 
:|END f 

l [go j 




Specify the hexadecimal channel 
and unit number of the device to 
be traced by the VTAM trace. 
A maximum of 3 may be specified. 


Trace all 
devices 


GO (valid 
SYSIPT parameter) 




GO terminates the PDAID control 
input and causes the default for 
those options that are not speci- 
fied. 


None 



Note 1: OUTPUT DEVICE and AAA are mutually exclusive. 

Note 2 : TRACE DEVICE and IGNORE DEVICE are mutually exclusive. 



VTAM BUFFER pool trace 



SYS LOG message 
SYSIPT parameter 


SYSLOG reponse 
SYSIPT operand 


Meaning 


Default 


PDAID= 


H 


VP : VTAMBUFFER pool trace 
XX : Terminates 


None 

Function 

continues 


OUTPUT DEVICE= 
(note 1) 


fcuu ] 
) X'cuu'l 
)END f 

[go J 


Specify the hexadecimal channel 
and unit number of a magnetic 
tape unit for the output device 
of the PDAID. 

Note .- For VTAM BUFFER pool 
trace only a magnetic tape unit 
is valid. 


Core -wrap 
mode 


AAA= 
(note 1) 


(S( 


nK : Specifies the number (n) of 
"K" bytes to be allocated as al- 
ternate area for core-wrap mode . *) 
The value n must be an even in- 
teger . If iFis not an even integer 
n+1 is taken. 

*) This area will be taken from 
the main page pool. 


Core -wrap 
mode, 
using PD- 
save area 


TRACE 
PARTITION 




END 
[GO J 




SP: Supervisor 
BG: Background 
Fn : Foreground n 

Only SVCs 49 and 53 ore 
recorded per partition 


Trace all 
partitions 
and the 
supervisor 


IGNORE DEVICE= 
(note 2) 




)END 1 

[go J 




Specify the hexadecimal channel 
and unit number of the device to 
be ignored by the VTAM trace . 
A maximum of 3 may be specified. 


Trace all 
devices 


TRACE DEVICE= 
(note 2) 




fcuu 

JX'cuu 1 

^END 

[go 




Specify the hexadecimal channel 
and unit number of the device to 
be traced by the VTAM trace. 
A maximum of 3 may be specified. 


Trace all 
devices 


GO (valid 
SYSIPT parameter) 




GO terminates the PDAID control 
input and causes the default for 
those options that are not speci- 
fied. 


None 



Note 1 : OUTPUT DEVICE and AAA are mutually exclusive. 

Note 2 : TRACE DEVICE and IGNORE DEVICE are mutually exclusive. 



7 Transient Dump 



SYSLOG message 


SYSLOG response 


Meaning 


Default 


SYSIPT parameter 


SYSIPT operand 


PDAID= 


IS} 


TD: Transient Dump 
XX Terminates 


None 

Function 

continues 


OUTPUT DEVICE= 


£w} 


Specify the hexadecimal channel 
and unit number of either a mag- 
netic tape unit or a printer for 
the output device of the PDAID. 


None 


GO (valid 




GO terminates the PDAID control 
input. 


None 



TAPE TO PRINTER UTILITY PROGRAM (PDAIDLST) 

The tape-to-printer util ity program reads the tape input(created by the PDAID tape 

routines) from SYS 005, and then prints the information on SYSLST in the same format 

that is used by the PDAID print routines. 

The tape-to-printer utility is loaded with standard DOS/VS job control statement: 

// EXEC PDLIST 

Input on tape may contain output from more than one PDAID function. 

Note: When tape is used as output device, always reset(terminate) the function before 
executing PDLIST 



DOS/VS System 

Line printer 

At least 6K of page pool 



Linkage Edit Statements 



INCLUDE IJBSDLNK 
// EXEC LNKEDT 



Printer is only output device 

No burst mode device must be running on same channel with printer 

Debugging of printer error recovery routines only possible with 
output class FASTREC 

Only real storage can be dumped 

Time dependent programs may not be debugged 

Alternate Area of PDAID cannot be used concurrently 



FUNCTIONS 



There are two groups of events : Elementary events and Dedicated events. 
Events appear as program checks. 



Elementary events are : 


Mnemonic 


Event 


BR 


Succssful branching 


IF 


Instruction fetching 


SA 


Storage alteration 


GA 


General register alteration 


TE 


Page translation exception 



The output for the elementary events depends on the specified output class 



SDAIDS (....Cont'd) 
Dedicated events are : 



Mnemonic 



Event 



PGMCHK 
PAGENQ 
PAGEHDL 



Program interruption codes X'Ol'-X'OF' , X'10' and X'12' 
Request for page is enqueued 
Request for page is handled 



The events PAGENQ and PAGEHDL are signalled by hooks in the page 
management routines. 

The output for dedicated events is predefined and specific to the event. 

OUTPUT 

Dedicated events 

The following predefined and events specific data Is printed : 



Recorded Information 


Dedicated Event 


PGMCHK 


PAGENQ 


PAGEHDL 


Event Mnemonic, Program old PSW, 
Time of day ( usee), Complete supervisor, 
Instruction at time of PGMCHK, Control 
Registers, General purpose registers 


• 






Event Mnemonic, Requestor ID, 

(TE/GETRAFIX/PFIX) 

Task ID, Virtual address of page to be handled 




• 


• 


Protection key associated with virtual page 
to be handled 




• 


• 


Real address of page frame to which the page 
is assigned 






• 



SDA1DS (....Cont'd) 



Elementary events 



The output class (OUTCL) determines the amount of the information 
to be recorded for events BR, IF, SA, GA, and TE. 



Recorded 
Information 


Output Classes 
Mnemonic 


01 


02 


03 


04 


05 


06 


07 


08 


00 


PSW 


GPR 


LOW 
CORE 


COM 
REG 


PAGE 
TAB 


SUPV 


DUMP 
REAL 
NDD 


PDUMP 


FAST 
REC** 


Event ID*progr 
old PSW,time 
of day( usee) 




















Instruction 
causing event 














*?* 






GPR's 




















Low Core 




















Current COMREG 
and SYSCOM 








• 




• 


• 






Control registers 




















Segment-, page- 
and page frame 
tables 










• 


• 


• 






Complete superv 












• 


• 






Complete real 
storage 














• 






Area between vir- 
tual address limits 
















• 




TE-MASK 
PER mask(ctlr 9) 
GPR mask (ctlr 9) 
PER start address 

(ctlreg 10) 
PER end address 

(ctlreg 1 1) 
GPR's 13,14,15, 
0,1,2 


















• 


* Event ID for BR, IF,SA and GA= event mnemonic and instruction address 

Event ID for TE= mnemonic TE and address of the virtual page causing TE 
** FASTREC is an output class that stores the described information into an 

SDAID internal buffer. Information for several events is stored and printed 

at one block 
*** INSTR and PSW are not printed if NDD is forced after STOP ON EVENT VIA 

NDD BYTE X"FF' 



SDA1DS (....Cont'd) 
COMMUNICATION 
Initialization 
Communication with SDAID 



Console 


Operator Action 


Remarks 




//EXEC SDAID [,REAL,SIZE= 12K ] 


SDAID may only be used in a DOS/VS system. If it is initialized 
in a real partition, SIZE parameter is also required. 


4C55D GIVE SPACE FOR SDAID= 


[f] END / ENTER 


SD-area requires at least 6K at page pool. If OUTCL=FASTREC 
is used it is recommended to give at least 8K . 


4C70E DUPLICATE REQUEST FOR 
PDAID AND/OR SDAID 




Use of SDAID and alternate area of PDAID is exclusive. 


4C56E INSUFFICIENT SDAID SPACE, 
REALLOCATE 


Reallocate real partitions 


Message appears only if increasing of the page pool is required. 


4C58D OUTPUT DEVICE= 




X'OOE" 

X'CUU'[,GO] 

GO 


END/ENTER 


Device must be a line printer; No burst mode 
device must be running on the same channel. 


4C60D STOP ON EVENT= 


[nO C' G °]] END/ENTER 


A wait PSW with address part X'OOOOEEEE' will be loaded. 
The NDD byte may be set to X'FF' to get the non-destroying 
DUMP. Processing continues after pressing the external inter- 
rupt key. 


4C61D EVENT LIMITS= 




rX'000000' .X'FFFFFF' |\GO] 


END/ENTER 


Lower and upper limit of virtual storage to be traced: 
. Instruction address on events BR,IF,TE and GA 
. Altered address on event SA 

If lower limit is higher than upper limit, wrap around occurs. 


f, X'LLLLLL' f I 

X'LLLLLL' LX'hhhhhh' ,GO 

I GO [ J 



SDAIDS (....Cont'd) 



4C59D OUTCL= 



GO 



PSW 

GPR 

LOCORE 

COMREG 

PAGETAB 

SUPVISOR 

DUMPREAL 

, lower and upper t 



PDUMP 



, X'aaaaaa 1 



,GO 

' ', PGMCHK 



,X'bbbbbb' 
GO 



nit. I GO] 

^■'Uoll 



AUTOMAT 
,GO 



,c[H] 



OUTCL may be specified for events BR, IF , SA, GA and TE. 

For the other events, predefined data is recorded. 

DUMPREAL and PDUMP cause dumping of real storage only. 

FASTREC may be used for printer debugging. 

PGMCHK causes wrap around mode of internal buffer which is 

written out each time a PGMCHK occurs. 

AUTOMATIC causes writing out of the internal buffer if it is full 



END/ENTER 



4C62D EVENT B 



Lgo]]ei 



Event appears after successful branching. 



4C63D EVENT IF = 



Jg CGO] END/ENTER 



Event appears after instruction fetching. 



4C64D EVENT SA= 



CGOJJEI 



Event appears after storage alteration. 



4C65D EVENT GA= 



rX'O 1 2 . 
I NO 



[,GO]l 



END/ENTER 



Event appears after alteration of one or more specified 
General Purpose Register(s). 



SDAIDS (....Cont'd) 



Communication v, 



Console 


Operator Action 


Remarks 


4C66D EVENT TE= 


[no [/GO]] END/ENTER 


Event appears after page translation exception 


4C67D EVENT PGMCHK= 


[nI&go]] end/enter 


Event appears after PGMCHK interruption with codes 
X'OI'-X'IO' and X'12\ Output is predefined. 


4C68D EVENT PAGENQ= 




JJ,q [,GO] END/ENTER 


Request for page is enqueued. Event is signalled by a hook in 
Page Management Routine. Output is predefined. 


4C69D EVENT PAGEHDL= 


\£q\ end/enter 


Request for page is handled. Event is signalled by a hook in 
Page Management Routine. Output is predefined. 



if GO is entered for a 



fer, the dialogue is terminated immediately and defaults (underscored) are taken for the remaining parameters. 



Changing 



When the SDAID is initialized, parameters can be changed with the CPU in 
stopped state. 

The procedure (see example) printed at initialization time shows which control 
registers or which locations in real storage have to be altered. 

Example 

These are the parameters that you can change from the console- 
Procedure: Machine in stopped state, hit ALTER/DISPLAY. Examples below: 

To alter ctl reg 9 to 40000000 

....type in AC 9 40000000 END key 

To alter MS location 03CC8C to FF 

....type in AM 03CC8C FF END key 

Printer Address on hex 033480 Format 0XXX 

Output Class on hex 033490 Form UUYY 

where IF: UU=00 FASTREC 

UU=01 PSW 

UU=02 GPR 

UU=03 LOCORF 

UU=04 COMREG 

UU=05 PAGET AB 

UU=06 SUPVISOR 

UU=07 DUMPREAL 

UU=08 PDUMP 

YY= 00 Automatic SDBUFFER Output 

YY=FF SDBUFFER Output on PGMCHK 

StoponEvent on hex 003348C X'FF'= YES, X'00'= NO 

Non -destroying Dump on hex 003348E X'FF'= YES 

Event Limits Start Address Ctl Reg A Hex OOXXXXXX ADDR 

End Address Ctl Reg B Hex OOXXXXXX ADDR 

PDump Limits Start Address On hex NNNNNN OOXXXXXX ADDR 

End Address On hex NNNNNN OOXXXXXX ADDR 

SDAID Events To enable - Switch on the BIT/BYTE - 

BR Event Ctl Reg 9 Hex 80000000 BIT 

IF Event Ctl Reg 9 Hex 40000000 BIT 

SA Event Ctl Reg 9 Hex 20000000 BIT 

GA Event Ctl Reg 9 Hex 10000000 BIT 

GPR Mask (0-15) . . Ctl Reg 9 Hex 1000XXXX POSITIONAL 

BITS (see note) 

TE Event Main Storage 033484 Hex FF BYTE 

PGMCHK Event Main Storage 033486 Hex FF BYTE 

PAGENQ Event Main Storage 033488 Hex FF BYTE 

PAGEHDL Event Main Storage 03348A Hex FF BYTE 

Note: SDAID needs external interrupt if printer became unready 

CPU-ID is Hex 0072050301450000 

4057 I SDAID successfully initiated 

Note: see next page for GPR Alteration Masks 



SPA IDS (....Cont'd) 

Control Register 9 , General Purpose Register (GPR) Masks: 






80 00 


1 


40 00 


2 


20 00 


3 


10 00 


4 


08 00 


5 


04 00 


6 


02 00 


7 


0100 


8 


00 80 


9 


00 40 


A 


00 20 


B 


00 10 


C 


00 08 


D 


00 04 


E 


00 02 


F 


0001 


Termination 





The SDAID is terminated and the SDAREA is released to the page pool, by using 
either one of the following: 

• The AR (Attention Routine) command ENDSD 

• The Job Control Statement // EXEC ENDSD 



Note: SDAID can be made inactive (elementary events only) by clearing 
control register 9. 

Abort DUMP or PDUMP: Stop line printer and make ready again, then 
hit external interrupt key twice within one second. 



General 

This program should be used in addition to the Stand-alone Dump to dump information from 

the Page Data Set. 

Control cards may be read from SYSIPT or entered via SYSLOG. 

Continuation cards are not allowed, but multiple cards may follow. 

CORE IMAGE LIBRARY 



Phas 



PDSDM 



RELOCATABLE LIBRARY 

Module name: IJBPDSDM 



Two ways of dumping exist: 



• Dump and select from SYSVIS to SYSLST 

• Dump whole SYSVIS to SYS001 (tape or disk), then select and print from SYS001 
to SYSLST lateron. 



^\from 


SYSVIS on 
DISK 


SYSOOI on 


to ^\ 


DISK 


TAPE 


SYS001 


g 


• 






| 


• 






SYSLST 


. * 


. * 


• * 



Assign/label requirements: 

from SYSVIS: 

// ASSGN SYSOOO, X'CUU' 

// DLBL PDSDISK, 'PAGE DATA SET', 99/365, SD 

// EXTENT SYSOOO,,!,,, 

from SYSOOI (disk): 

// ASSGN SYSOOI, X'CUU' 

// DLBL PDSDISK/BACKUP FOR PDS', 99/365, SD 

// EXTENT SYSOOI,.... 

from SYSOOI (tape): 

// ASSGN SYSOOI, X'CUU' 

// TLBL PDSTAPE, 'BACKUP FOR PDS' 

to SYSOOI (disk): 

// ASSGN SYSOOI, X'CUU' 

// DLBL S01DISK, 'BACKUP FOR PDS', 99/365, SD 

// EXTENT SYSOOI 

to SYSOOI (tape): 

// ASSGN SYSOOI, X'CUU" 

// TLBL S01TAPE, 'BACKUP FOR PDS' 



SYSVISDUMP (....Cont'd) 
To define output device: 

TO rSYSLSTCJ]] 
TO [ SYSOOl J 

meaning: 

TO= SYSLST : from SYSV1S to SYSLST 

TO= SYSLST,T : from SYSOOl to SYSLST 

TO SYSOOl (default) : from SYSVIS to SYSOOl (without selection possibility) 

To select amount of data to be printed 

• Partition ID : Total virtual partition will be dumped 

• (from, to) : All pages belonging to specified address space will be dumped 
virtual addresses 

• Virtual address : Only one page containing the specified address will be dumped 
Note: The virtual address must be in hex and always 6 bytes long. 

Examples: 

1) Print and select from SYSVIS to SYSLST immediately after IPL : 

// JOB DUMPPDS1 

// ASSGN SYSLST, X'CUU' 

'// ASSGN SYSOOO, X'CUU* 

// DLBL PDSDISK,'PAGEDATASET',99/365,SD 

// EXTENT SYSOOO,, 1,,, 

// EXEC PDSDM 

TO= SYSLST 

F3,F1,03D170 

/* 

/& 

2) Dump all data from SYSVIS to SYSOOl (tape) immediately after IPL : 

// JOB DUMPPDS2 

// ASSGN SYSOOO, X'CUU' 

// DLBL PDSDISK/PAGE DATA SET', 99/365, SD 

// EXTENT SYSOOO,, 1,,, 

// ASSGN SYSOOl, X'CUU' 

// TLBL S01TAPE, 'BACKUP FOR PDS' 

// EXEC PDSDM 

/* 

/& 

3) Print and select from SYSOOl (disk) to SYSLST 

// JOB DUMPPDS3 

// ASSGN SYSLST, X'CUU' 

// ASSGN SYSOOl, X'CUU' 

// DLBL PDSDISK, 'BACKUP FOR PDS', 99/365, SD 

// EXTENT SYSOOl,,!,,, 

// EXEC PDSDM 

TO= SYSLST,T 

F3,F1,03D170 

(03A891,03(005),F4 

/* 

/& 
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Terminating the dump 

This can be done in any of the three ways given below: 

• Enter EOJ on SYSLOG 

• Having a /* or a /& card at the end of the jobstream when entering 
parameters through SYSIPT 

• Pressing the END key in response to the message: OV21D GIVE 
PARAMETERS after at least one address has been processed 



DUMPGEN AND STAND-ALONE DUMP 



DUMPGEN allows you to generate a stand-alone dump program that must be used 
to obtain information about the system under certain conditions of system 
malfunction. 

The dump consists of a printout of real storage (except bytes X'OG" - X'17', X'40 1 - 
X'4B', X'BA' - X'BB' and 214 bytes of a non-critical area in the supervisor). 
Two types of dump programs can be generated using DUMPGEN : 

• Translating dump 

• Formatting dump. 

Both programs produce a convential dump with translation. In addition, the 
formatting dump produces a pre-formatted printout of the DOS/VS interface 
tables. This dump is generated if the DUMPGEN option FORMAT=YES is 
specified. 

Executing DUMPGEN 

Before being able to execute DUMPGEN you must catalog it to the core image 
library. Execute it in any partition by the job control statement or command : 

// EXEC DUMPGEN 

You enter DUMPGEN and read its control statements from SYSIPT. 

Note that SDAIDS may not be initiated during execution of DUMPGEN. 

The two types of control statements used with DUMPGEN are ASSGN and OPTN, 

described as follows : 

ASSGN Statement : ASSGN defines the output device for the stand-alone 
dump program. 



SYSLST 
X'CUU' 



Name 


Operation 


Operand 


(blank) 


ASSGN 


SYSLST, X'cuu' 



The only valid logical unit assignment. 

Must define the address of the SYSLST Printer. If the ASSGN 

statement is omitted, then X'OOE' is assumed. 



OPTN Statement : OPTN defines the type of output generated by the 
DUMPGEN program. 



Name 


Operation 


Operand 


(blank) 


OPTN 


INTR=NO 
YES 
DECKS=nnnnnn 

PPOOL= NO 
YES" 

FORMAT= NO 
YES 

TAPEIPL= NO 
YES 

DISKIPL= NO 
YES - 



DUMPGEN AND STAND-ALONE DUMP (. . .Cont'd) 

Operands for the DUMPGEN option statement 

INTR YES produces a DUMP program that, when loaded, enters the WAIT 

state. Either press the INTERRUPT button on the CPU operating 
panel to print the output on X'OOE', or press the STOP button and 
then START button of the printer desired for the output device. 
NO produces a DUMP program that, when loaded, prints out the 
contents of real storage either on the SYSLST printer defined with 
the ASSGN statement or on X'OOE". 



Specifies the number of DUMP card decks (punched out on SYSPCH) 
desired, nnnnnn may be any decimal number from 1 to 99,999,999. 
A blank card separates each deck produced. If DECKS is omitted, 
one deck is produced. 

YES produces a dump program that, after printing out real storage, 

will print the formatted contents of the Boundary Box and the 

contents of the real storage in sequence of ascending virtual 

addresses. 

If NO is specified, the last two items are not printed. 

YES produces a translating stand-alone dump that formats and 

displays the DOS/VS supervisor tables after displaying the contents 

of real storage. This formatted display depends upon the location 

of the communications region. 

If the communications region cannot be related, the program is 

terminated when the formatted display is to occur. 

In this case the following message is printed on the dump output : 

COULD NOT FIND COMREG BETWEEN CO AND A00, 
FORMATTING WILL NOT OCCUR. 



lotted has been destroyed, results a 



If the information t 
unpredictable. 

If NO is specified or FORMAT is omitted, a non-formatting 
translating dump is generated. 

TAPEIPL If YES is specified and SYSPCH is assigned to a tape unit, the 

stand-alone dump written on tape may be IPLed directly from the 

If NO is specified, or TAPEIPL is omitted and SYSPCH is assigned 
to a tape unit, the stand-alone dump records are written on tape 
preceded by an ASA control character. 

DISKIPL If YES is specified and SYS 006 is assigned to a diskette I/O unit, 

Ihe standalone dumpprogram is written on diskette and can be IPLed 
directly from diskette. 

If NO is specified and SYSPCH is assigned to a diskette I/O unit, the 
stand-alone dump program is written on diskette, and each record is 
preceded by an ASA control character. 

Control statements for the DUMPGEN operands. 

Control statements may be specified in any order, however, the following rules apply: 

• All statements may be omitted, but if they are DUMPGEN assigns 

printer X'OOE', INTR=NO, FORMAT =NO, and PPOOL=NO options. 



Only one operation a 



3ne operand per control statement i< 



DUMPGEN AND STAND-ALONE DUMP (.. .Cont'd) 
Control statements for the DUMPGEN operands (.. .cont'd) 

• The last statement processed of a duplicate operation overrides all previous 
statements of the same operation with similar operands (if DECKS=2 is 
followed by DECKS=5, five decks are punched). 

• The name field must be blank. 

• Decimal operands may contain leading zeros. 

• One or more blanks must follow the operand if comments are to be made. 

1. To create a stand-alone dump program on cards or tape: 

// JOB CARD DUMP 

//ASSGN SYSPCH,X\:uu- 

// EXEC DUMPGEN 

ASSGN SYSLST,X^00F' 

OPTN FORMAT=YES 

OPTN PPOOL=YES 

OPTN DECK=1 

/* 

/& 

This will create a single stond-alone dump program on cards. The 

program will use the printer X'OOF' for dump output. 

2. To create a stand-alone dump program on diskette: 

// JOB DISKETTE DUMP 

// DLBL IJSYS06, *filename',,DU 

// EXTENT 

//ASSGN SYS006, DISKETTE 

// EXEC DUMPGEN 

OPTN DSKTIPL=YES 

OPTN FORMAT=YES 

OPTN PPOOL=YES 

OPTN DECK= 1 

/* 

/& 

This will create one single stand-alone dump program diskette. 

The program will use the default output printer X^OOE', as no 

ASSGN statement was provided. 

DUMPGEN messages 

The functions of DUMPGEN-to-operator error message routines are : 

Cancel the job is SYSLOG is not a 3215/3210 or a System/370 Model 
125/115 video display unit. 

Reissue the message if operator response is to press the CANCEL key. 

Process an operator response of END/ENTER as IGNORE. 

Cancel the job if operator response is CANCEL. 

Ignore the control card in question when the operator response is 
IGNORE, 
none of the preceding operator responses is issued, then DUMPGEN assumes 
that a correction has been made and processes it. 

V-22 



DUMPGEN AND STAND-ALONE DUMP (. . .Cont'd) 

Stond-olone Dump Program (REAL DUMP) 

This program is generated for your installation using the IBM program DUMPGEN. 

DUMPGEN produces a dump program that is either punched into a card deck or 

stored on magnetic tape or to SYS006 (diskette). When required, the dump program thus 
generated can be loaded into the system via the standard IPL procedure. 

The stand-alone dump program that is generated by DUMPGEN provides either 
a conventional dump or a formatted dump, depending on the FORMAT option 
used in the DUMPGEN program. 

Operation 

During execution of the stand-alone dump program, a non-critical area in the 
supervisor is used to load the program. The LOAD ADDRESS of the non-critical 
area is punched (in decimal) in the first card of the stand-alone dump card deck 
punched by the DUMPGEN program. Because of this use of the non-critical 
area if is recommended to use the stand-alone program for a system using a 
supervisor that was used for the generation of that dump. 

The conventional dump prints the contents of real storage locations, but does not 
dump the floating point registers. In addition to the areas dumped by the 
conventional dump, the formatted dump prints the DOS/VS interface tables in a 
more readable form. 

For both types of dump the following is printed : 

1. The contents of the general registers, the old and new PSWs, the interruption 
codes, CSW, CAW, and TIMER. 

2. The contents of real storage in 2K blocks. Each block is preceded by a 
sequence number. 

3. At the end of the real storage dump, page address and status information is 
printed that contains the following information for each page frame : 

• The virtual address 

• The real address of the associated page 

• The sequence number of the 2K block 

• Information that indicates whether the contents of the page frames 
has been changed. 

4. The contents of the control registers are printed after page address and 
status information. 

5. Depending on the options selected, the following then occurs : 

If PPOOL=YES 

• The formatted contents of the boundary box is printed after the 
control registers. 

• The contents of real storage is printed in 2K blocks in sequence of 
ascending virtual addresses. 



DUMPGEN AND STAND-ALONE DUMP (.. .Cont'd) 

Operation ( . . . Cont 'd) 

If FORMAT=YES 

the formatted contents of the tables listed below are printed at the end of tl 

dump . 

PARTITION SAVE AREAS 

COMREGS 

PIBs 

AP SUBTASK PIBs (if AP supported) 

LUBs 

PCIL LUBs (if PCIL supported) 

PUB 

ERROR RECOVERY BLOCK 

CHANNEL QUEUE 

FLOATING POINT REGISTERS 

COPIES AND TRANSLATED CCB 

FIXINF EXT. BLOCKS 

COPIED AND TRANSLATED CHANNEL PROGRAM 

IDAL BLOCK QUEUE 

FIXINF BLOCK 

BOUNDARY BOX 

SEGMENT TABLE 

PAGE TABLE 

PAGE FRAME TABLE and PAGE FRAME TABLE EXT 

SELECTION POOL 



DOSVSDMP AND STAND-ALONE DUMP 



This program creates a stand-alone dump program which writes a storage dump 
in a file on tape or disk. This file can be printed during normal system 
operation at the user's convenience. 

The dump program may reside on tape or disk. When the dump program is 
executed, the dump is written onto the same device from which it was IPLed. 

The program produces a copy of virtual storage in virtual page order, and a 
copy of real storage in real page order. Pages which are allocated but paged 
out to SYSVIS are included in the virtual dump. 

The storage dump can be printed either formatted or unformatted. In a 
formatted printout each field identified is printed with certain system control 
blocks. The unformatted printout is only a conventional translated copy of 
storage. 

N ote : 7-track tape drives without data convert are not supported by 
DOSVSDMP. 

1 . Record any error or status indicators on the system console. 

2. Using ALTER/DISPLAY, record the current PSW, general registers, and 
floating point registers. 

3. Perform the Store Status procedure for your system. 

4. Mount and IPL your dump program tape or disk. 

5. If message "DOSVSDMP COMPLETED" is displayed, restart DOS/VS and 
prepare to print the dump as soon as the system has been restarted. 

6. If the stand-alone dump program cannot be completed, due to errors, it 
enters the hard wait state with an error stored in the current PSW. See 
the section "DOSVSDMP Hard Wait Error Codes" in DOS/VS Messages for 
details of these codes and subsequent action. 



Creating a stand-alone dump program 

Before you can execute DOSVSDMP, it must be cataloged to the core image 
library. The dump program can be generated in a tape resident version or in a 
disk resident version. 

How to create a tope resident stand-alone program 

1 . Select a non-labeled tape to be used as the dump volume. 

2. Execute DOSVSDMP: 
//JOB 

// ASS GNSYS006, TAPE 
// EXEC DOSVSDMP 
/& 

3. When message 4C75D is issued, reply : TAPECREATE. 

4. Message 4C79I indicates that creation of the dump program tape is completed. 

5. Message 4C75D is issued again. Reply : EOJ. 

Refer to DOS/VS Messages for an explanation of the above messages. 



DOSVSDMP AND STAND-ALONE DUMP (. . .Cont'd) 



How to create a disk resident stand-alone dump program 

1 . Select a disk pack to be used as the dump volume. Note that the IPL text on 
the pack will be replaced by the dump IPL text. The selected pack cannnot be 
a system residence volume. 

2. Before you can execute DOSVSDMP, the file which is to hold the dump 
output must be allocated on the selected volume. This file must be named 
DOSDMPF, and begin and end on a cylinder boundary. The size of the file 
is calculated using the following formula : 

N = ((2+V+R)/T) + 2 

where 

N is the number of tracks needed, 

V is the number of pages in the virtual address area, 

R is the number of pages in real storage, 

T is: 3 for 2314/3340 devices, 

6 for 3330/3330-1 1 devices, 

8 for 3350 devices 
The result N must be rounded to the next higher number of tracks equivalent 
to the next whole number of cylinders. 

3. Execute DOSVSDMP: 

//JOB 

//ASSGN SYS006,DISK 

// DLBL DOSDMPF, 'filename' 

// EXTENT SYS006, balance of extent information 

// EXEC DOSVSDMP 

/& 

4. When message 4C75D is issued, reply : DISKCREATE 

5. Message 4C79I indicates that creation of the dump program disk is completed. 

6. Message 4C75D is issued again. Reply : EOJ. 

Refer to DOS/VS Messages for an explanation of the above messages. 

Executing the stand-alone dump program 

The program is activated via an IPL of the tape or disk containing the dump program. 
The IPL procedure loads the program into and overlays storage locations X'AOO' to 
X'AFF 1 . Once loaded, the program proceeds to write out storage in virtual page 
order. Following the virtual storage dump, or as a result of an error in attempting to 
dump virtual storage, a dump of real storage in real page order is taken. Upon 
completion of the dump message DOSVSDMP COMPLETE is issued and the system is 
placed in the wait state with a completion code in bits 48 to 63 of the current PSW. 

Printing the stand-alone dump output 

For printing the stand-alone dump output, the program requires at least 36K of 
storage, not including the size of the supervisor. 

1 . Execute DOSVSDMP: 

//JOB 

//ASSGN SYS006,device 

// DLBL DOSDMPF, 'filename' 

// EXTENT SYS006,balance of extent information 

// EXEC DOSVSDMP 

A 

SYS006 is assigned to the device which contains the dump file. 
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DOSVSDMP AND STAND-ALONE DUMP (. . .Cont'd) 
Printing the stand-alone dump output ( Cont'd) 

2. When message 4C75D is issued, reply with one of the following options: 

FORMAT for a formatted printout of the dump file. 

FORMAT, REAL for a formatted printout and a conventional translated 

printout of real storage following the virtual storage 

printout. 
DUMP for an unformatted printout of the dump file. 

DUMP, REAL for an unformatted printout and a conventional 

translated dump of real storage. 

3. Message 4C81 1 will be issued, indicating the default print selection 
options. 

4. Then message 4C80D is issued to allow you to change the print selection 
options. The options may be entered separately or as one reply, in which 
case they must be separated by a comma. The options are : 

(YES| If SYSVIS=YES is specified the pages retrieved 

from SYSVIS during the dump will be printed. 
For unformatted dumps SYSVIS=YES is the only 
valid option. 

If SVA=YES is specified the Shored Virtual Area 
will be printed. 

If PARTITlON=ALL is specified the supervisor 
and all partitions will be printed. 
If PARTITION=xx is specified the supervisor 
and only the specified partition are printed. 
xx must be a valid partition ID. 

Press END/ENTER to terminate option selection. Message 4C81 1 is issued 

to display the selected options. 

When message 4C75D is issued again, repeat step 2 or reply with EOJ. 



This program allows you to make changes to programs cataloged In a 

system or private core image library. |t provides a printout of the changes on 

SYSLST. This printout should be kept on the installation to keep track of the changes 

made. 

System requirements 

PDZAP can be executed in any partition. Since PDZAP accesses a core image 
library, other programs running currently should not use the phases PDZAP is 
operating on the same library. SYSLOG must be assigned to the operator 
console. When card input is used, SYSIPT must be assigned to a card reader 
(hopper 1 on 5425/2560). SYSLST should be assigned to a printer. 



Executing PDZAP 

The PDZAP program can be executed from the operator console or from a card 
reader. 

How to execute PDZAP from the operator console 

The following is an example in which the program PROG is used as a phase to be 
modified. 

Call in the program 
// EXEC PDZAP 

The system will respond : 

4C86I IJBPDZAP REL.32.0 program name and version 

4C99A Enter your name. Reply to this message by typing your name. 

4C85A ENTER PHASENAME (XCIL= xxxxxxxx) 

Reply to this message in one of the following ways: 

a. if PROG is in the system core image library enter SCIL=PROG, or 
simply PROG, as SCIL is the default. 

b. if PROG is in the private core image library enter PCIL=PROG. 

When the phase is found, the following messages are issued: 

4C87I LOAD ADDRESS=xxxxxx 

4C88A ADDRESS XXXXXX,OFFSET+XXXXXX,SCAN=XX. .XX,REF=XXXXXX 

Reply to this message in one of the following ways: 

• option 1 specify the hexadecimal address of the data you want 

displayed : 08072A 
o option 2 specify the offset to the reference point of the data you 

want displayed (the initial reference point is the load 
address): +6D4 

• option 3 specify a character string to be searched: SCAN='LABPROG 

• option 4 specify a hexadecimal string to be searched : 

SCAN=D3C1C2D7D9D6C7 

• option 5 set a reference point : REF=08071C. 



PDZAP (...Continued) 

How to execute PDZAP from the operator console (continued) 

If an address is invalid or a string cannot be found, an error message 
will be issued. 

To options 3 and 4 the system will first respond with : 
4C94I SCAN ADDRESS xxxxxx 

Options 1-4 will result in the display of up to 16 bytes of data in the 
format 



where xxxx..xx is the hexadecimal representation and cccc.cc is 
the corresponding character representation. 

The data printed is contained in a single library block. If less than 16 
bytes are displayed, it is either the end of the program or the end of 
the library block. 

If only a display is wanted, press END/ENTER. 

To modify the displayed data, type in replacement data for the number 
of bytes to be changed. For instance, if the data displayed is : 

4C89D 

05B0121 1074641 00000 14790B42807F6 6 

to change the first four bytes to NOP, type in : 

07000700 



The system will respond with message 4C88A again and you can use one 
of the five options mentioned above to display or modify another portion 
of the same phase, or to set another reference point. 

If you are finished with this phase> but want to access another phase, use 
vith this phase by typing 

Now the program repeats message 4C85A, which allows you to specify the 
name of another phase. 

If you want to terminate the execution of PDZAP, use 

• option 7 end PDZAP operation by typing: END 

How to execute PDZAP from a card reader 

Executing PDZAP from SYSIPT is the same as from SYSLOG, with the following 
exceptions: 

// UPSI 1 must be specified to indicate card input 
data must be verified before it can be changed. 



PDZAP (...Continued) 



How fo execute PDZAP from a cord reoder (continued) 



Example : 

// UPS I 1 

// EXEC PDZAP 

NAME=your name 

SCIL=PROG 

+6D4 

VER=05B0, 12111 
or VER=05B01211 ' 

REP=07000700 ' 
or REP=O700,0700 

END 



Indicate card input 

call the program 

specify your name 

specify the phase to be accessed 

specifies the position of the data to be 

displayed (option 2) 

specifies the data to be verified; if the data is 

not found, no update will take place 

specifies the data which is to replace the date 

just verified 

terminates the run 



The format of the VER and REP data can be : 



a hexadecimal string (full bytes, or an even number of digits) 

a set of 2 -byte entries, seporafed by commas 

a character string, preceded by a quote (VER='LABPROG). 



Diagnosing I/O errors 

Verifying I/O device repairs and Engineering Changes 

Checking I/O devices 

System Generation requirements: 

The following system generation macro parameters apply to OLTEP : 



Macro 


Parameter 


Remarks 


FOPT 


OLTEP= YES 


Default value. 


FOPT 


OLTEP= NO 


If OLTEP support is not required. 


FOPT 


OC=YES 


1 ) Forced when OLTEP= YES is specified. 

2) Allows you to force a communications interval using 
the console interrupt. 


FOPT 


RETAIN= YES 


This option permits the use of the RETAIN/370 function 
of OLTEP. 


FOPT 


RETAIN= NO 


Default value. 


FOPT 


IT=YES 


Will improve the performance of OLTEP in a multipro- 
gramming environment. 


FOPT 


RELLDR=YES 


Relocating load support (Forced when OLTEP=YES) 



JCL TO INVOKE OLTEP 



Statement 


Comments 


// JOB XXXX 


Mandatory. 


//ASSGN SYSnn^X'cuu 1 


One ASSGN statement is necessary for each 
device tested or accessed by a test. None is 
required if the device was permanently assigned. 


// UPSI 01 


This statement is necessary if a console device is 
available but the test run definition is to be ente- 
red via the input job stream. 


//EXEC IJZADOLT,REAL, 
[SIZE=NKJ 


Mandatory, OLTEP will run only in real. 
Size= parameter must be minimum of 16K or 20K 
if RETAIN is invoked. This will allow a 4K OLT 
to execute. If OLTs larger than 4K are to be 
run, the SIZE= parameter must specify a size 
equal to 12K plus the size of the OLT. The size 
specified must be multiple of 2K. 


dev/test/opt/ 


This statement is included if the test-run defini- 
tions are entered via the input job stream. 


/* 


Mandatory. 


/& 


Mandatory. 



Note: If SYSLOG is not a console, card input must be used. 



TABLE OF OPTIONS 



Option 


Entry 


Description 


Testing 
Loop 


TL(n) 
NTL 


Recycle the test. If you specify a value (n),OLTEP . 
runs the test the number of times indicated. If you 
do not specify a value, the test cycles 10 times. 
The maximum value allowed is 32,767 decimal. 
(See note 1) 


Error Loop 


EL(n) 
EL(I) 
NEL 


Authorizes any error loop coded in the OLT to be 
executed the specified number of times. If you spe- 
cify a value (n),the test loops the number of times 
indicated. If you do not specify a value, the test 
loops the number of times indicated in the preface 
of the OLT. If you specify the character l,a flag is 
set which indicates to the OLT, that it must loop 
indefinitely on the error. You can terminate the 
loop by specifying NEL following a request for com- 
munications. (See note 1) 


Print 


PR 
NPR 


Print messages from the OLT. If you enter NPR, all 
messages originated by the OLT and normally desig- 
nated for SYSLST are supressed . (See note 2) 


Error Print 


EP 
NEP 


Print diagnostic error messages from the OLT. The 
FE option overrides NEP when a first error is encoun- 
tered(once per section). (See note 3) 


Control 
Print 


CP 
NCP 


Print OLT start and termination messages on SYSLST 
and SYSLOG. 


Parallel 
Print 


PP(n) 
NPP 


Use the console device, in addition to SYSLST for 
OLT messages. Four levels of print are available on 
the parallel printer by entering one of these 
numbers at (n). 

0: HEADER only 

1: HEADER, DESCRIPTION and COMMENTS 

2: HEADER and RESULTS 

3: HEADER, DESCRIPTION, COMMENTS and 
RESULTS 


First error 
Comm un i ca — 
fions 


FE 
NFE 


Forces a communications interval when the first error 
is encountered. (See note 3). A message is printed in- 
dicating the test being run and the device being tes- 
ted.This is followed by the 01E105D message that 
allows you to: 

. Change the device and/or test fields. 

. Continue the test by entering 

R01,'///' or R01, '//(Option change)/'. 

. Enter any OLTEP verb. 

. Cancel OLTEP by entering 
R01,'CANCEL'. 
There cannot be a first error communication if a con- 
sole device is not available. 


Manual 
Intervention 


Ml 
NMI 


Informs the OLT section to run all manual interven- 
tion routines within the test request. (Manual Inter- 
vention and RE are mutually exclusive options) 


Remote 


RE 
NRE 


RETAIN/370 only. If RE is specified, OLTEP is con- 
trolled by the remote specialist, who enters NRE to 
return control to the on-site customer engineer. 



TABLE OF OPTIONS (....Continued) 



Option 


Entry 


Description 


Trace 


TR 
NTR 


Trace all functions called by OLT.(See note 4) 


EXT= 




EXT= 


Information following this option is passed to the 
OLT section by way of a 56-byte buffer. This in- 
formation must be the last entry in the option 
field and can contain any character but a slash. 

EXAMPLE 

R01,'181/2400C/TL,EXT= BLOCK 4FFPRINT/' 
BLOCK 4FFPRINT goes into a buffer area within 
OLTEP and then passes on to the OLT section. 


The default options are unc 


erlined. 


Note 1: 


The FE option ov 
effect. However 
at a first error c 
specified, are in 


errides the TL and EL options, unless NPR is also in 
if you enter R 01,'///' or R 01,'//(option change )/' 
ammunications interval, the TL and EL options, if 
effect. 


Note 2: 


NPR without EL 


and/or TL is ignored. 


Note a 


Error print and F 


: are ignored if no print and either EL or TL are 


Note 4: 


Routine-to routine linkage is not traced. Do not attempt to use 
Trace function when SYSLST is cssigned to the test device. 



EXAMPLE OF OLTEP OPERATION 



, OLTEP is loaded into the back- 
ground partition 



BG assgnsys001,x'18r 

BG assgn sys002 / x'182' 

BG //exec ijzadolt, real, size=l 

BG E102I OLTS RUNNING 

BG E134I WARNING - DASD VOLUME LABELED CEPACK NOT 
PROTECTED FROM WRITE 

BG E107I OPTIONS ARE NTL^EL^PP^N MUEP^P^NRE^TR 

nitial communications interval] 



BG 01E105D ENTER— DEV/TEST/OPT- 

BG r01,'181/2400a// ' 

BG E119I NON-STANDARD TAPE LABEL 0181 

BG 04E139D REPLY B TO BYPASS, R TO RETRY,P TO PROCEED(MAY DESTROY 

DATA) 
BG r04,'p' 




OLTEP finds a nonstandard 
labeled tape mounted on the 
test device. 



"1 Error encountered 



BG E158I S T2400A $ UNIT 0181 ^ 

BG E129I FIRST ERROR COMMUNICATION T2400A 001 UNIT 0181 
BG E107I OPTIONS ARE NTL,NEL,NPP,FE,NMI,EP,CP,PR,NRE,NTR 
BG 01E105D ENTER— DEV/TEST/OPT/ ■ 



First erro 
interval 



communicatio 



BG r01,'I82//nfe,tW 
BG E158I *TT2400A$ UNIT 0181 
BG E158I S T2400A$ UNIT0182 
BG E158I T T2400A $ UNIT 0182 
BG E158IST2400AS UNIT 0182 



-" | Console interrupt key pressed 

BG E107I OPTIONS ARE TL, NEl7nPP,NFE,NMI,EP,CP,PR,NRE,NTR 
BG 01E105D ENTER-DEV/TEST/OPT 



Interrupt communications 
interval 



BG R 01, '/2400c, e/nty 

BG E158I *TT2400A$ UNIT 0182 

BG E158I S T2400C$ UNIT 0182 

BG E158I TT2400C$ UNIT 0182 

BG E158I S T2400E $ UNIT 0182 

BG E158I T T2400E $ UNIT 0182 

BG E107I OPTIONS ARE NTL,NEL,NPP,FE,NMI,EP,CP,PR,NRE,NTR 

BG 01E105D ENTER-DEV/TEST/OPTA* 

BG r 01, 'cance l' 

BG 1 100A READY FOR COMMUNICATIONS 



Test completion 

ications interval 



STORAGE LAYOUT 



DOS Supervisor 



OLTEP 

Resident Area 

(nucleus) 
Transient Manager, tables, 
constants, etc. 



OLTEP 
Transient Area 

IJZADO02, 
IJZADO03, 
UZACOMP, 



OLTArea 

T2400A, 
T2400B, 
T2311H, 
More core area 
etc. 



Customer Problem 
Program Area 



Customer Problem 
Program Area 



Supvr 




20K (minimum) 

Background 

Partition 



(minimum) 



Main Storage 
OLTEP Storage allocation with RETAIN/370 Active 



DOSAS EREP 

DOS/VS ENVIRONMENTAL RECORDING, EDITING, AND PRINTING (EREP) 
EREP is a program used by the customer or CE to print error statistics records that 
have been stored on the System Recorder File (SYSREC). When EREP is invoked, 
SYSREC prints out: 

UC Unit check records 

MDR Miscellaneous data records 

CCH Channel check handler 

MCAR Machine check analysis and recording records 

TES Tape error statistics 

RDE Reliability data extractor records 

IPL/EOD Initial program load/end of day records 

EREP can perform any combination of the following options (refer to Figures 
V-2, V-3 and V-4 for details of the options): 

Edit/print the entire SYSREC file. 

Create or update the history/RDW tapes. 

Selectively retrieve records from the SYSREC file or history/RDE tapes 
for editing and printing. 

Summarize the SYSREC files. 

Create or update a TES history tape. 

Edit/print TES data from the SYSREC file. 

Summarize TES data from the SYSREC file or history tape. 

Clear the SYSREC file. 

EREP is a self-relocating program and can be executed {// EXEC EREP) in any 
partition. Earlier editions of EREP required the program to be run in BACKGROUND 
only. 

Executing DOS/ VS EREP 

When the configuration data is needed or the SYSREC file becomes full, EREP can 

h fP e t!Mt^Pu G or SYSRDR by: 

//EXEC ERET *' '* * 

t Then EREP issues a message to the operator via SYSLOG, requesting the logical unil 
(Figure V-l), either SYSLOG or SYSIPT, that is to be used for entering the EREP 
options. The operator must respond with one of the following: 

C. followed by EOB or END for SYSIPT (system input reader). 

S. followed by EOB or END for SYSLOG 

N. followed by EOB or END, or END for the default option, EDIT. 



DOS/VSEREP (. 


. Cont'd) 


LOGICAL UNIT 


COMMENTS 


SYSIPT 


Optional 


SYSLOG 


Required, must be assigned to a 3210, 3215 or 
a Model 125 video display unit 


SYSREC 


Required 


SYS007 


Optional; must be assigned to a magnetic tape 
unit when a TES option is specified. 


SYS008 


Optional; required for TES options. 
Must be assigned to a magnetic tape unit. 
Used as a work tape. 


SYS009 


Optional; must be assigned to a magnetic tape 
unit for history/RDE options. 



Figure V-l. Logical units required by EREP. 



DOSASEREP (...Cont'd) 

ROD Command 

The ROD command con be submitted on the console typewriter or by a JCL card. 

The command is issued before the system is shut down, or at the end of the logical 

day, for systems that operate on o 24-hour basis. This command ensures that any 

statistical data held in main storage is added to the recorder file. The command 

also allows the end-of-day (EOD) record to be written if RDE is supported by the 

Note: If the message, 3E13I (recorder file not opened), is issued, enter a// JOB 
statement to open the file. 

EREP Options 

When entering the EREP options via SYS'PT, column 1 must be blank and only one 
option for each card is allowed. SYSIPT input must be delimited by an end-of-data 
file card (/* in columns 1 and 2). 

When entering the EREP options via SYSLOG, the entry must not exceed 80 
positions: 

1. Start with operation, OPTION. 

2. Follow with a blank. 

3. Follow with the option. 

4. Follow with EOB or END. 

Repeat this procedure for each option. When all the options have been specified, 
enter an EOB or END to continue processing. 

Embedded blanks within the operation and the option are not allowed. A misspelled 
word, system error, duplicate option, or unsupported option can be corrected at 
SYSLOG by the operator. However, if they are not corrected, they are ignored. 
Multiple options are all awed by EREP. 

It is recommended that the first EREP be run, using the option SUM. After 
reviewing the output, the SELECT option can be used to print specific data. 

Figure V-2 shows a list of available EREP options. 

When the EREP options are entered via SYSLOG, it is possible to execute the SUM 
and SELECT options more than once during an EREP run. After the SUM or SELECT 
function has been executed, the message, either: 

3E03A ENTER SELECT PARAMETERS 



3E0SA ENTER SUMMARY PARAMETERS 

is printed on SYSLOG. You may execute the SUM or SELECT function again by entering 
parameters at this time. If you wish to terminate the SUM or SELECT option, press END. 

Figure V-3 is o condensed list of the EREP options and the parameters required if the 
SUM option is specified. 

By means of specified search parameters, EREP selects records to be printed. The 
SELECT option initiates the search of these records on SYSREC, SELECT, TAPE causes 
a search of the history tape to be performed. 

The parameters of the SELECT option are checked for validity, but not for logical 
relationship. For example, although an MCAR record has no VOL field, the following 
parameters are considered valid: 

TYPE=MCAR 
VOL=1 23456 



DOS/VS EREP (... Cont'd) 

The select parameters are listed in Figure V-4. 

Any combination of parameters may be entered, the EREP program assumes that 
you will select only parameters that apply to the records wanted. If no select para- 
meters are specified with the SELECT option the MCAR records are selected and 
printed. 

An example of System/370 DOS/VS EREP is shown in Figure V-5. It is recommended 
that the SUM option be used. After reviewing the summary, use the SELECT option to 
print the desired records. 



DOS/VS EREP (...Cont'd) 



OPTION 


RESULT 


OPTION EDIT 


Edits and prints SYSREC onto SYSLST. 


OPTION CLEAR 


1 . Edits and prints SYSREC onto SYSLST. 




2. Clears SYSREC. 


OPTION SUM 


Prints the summarization of SYSREC onto SYSLST. The 




[disk f 


file is summarized by the hardware group(s) listed in the 




DISKETTE 




GROUP parameter. 




TAPE 




If records from multiple CPUs appear on the SYSREC file, 




MICR/OCR 




specify the serial number (xxxxxx) and model number 


GROUP=j 


UNITREC 




(yyyy) °f tne CPU whose records you wish to have 




TP 




summarized. If CPU data is not supplied, records from 




CPU 




all CPUs appearing on the SYSREC file ar summed to- 




2715 




gether. 




,ALL J 






CPU=xxxxxx, yyyy 




OPTION HIST,NEW(,2) 


1 . Creates the history /RDE tape on SYS009 (see note 1 ) 




2. Clears SYSREC. 


OPTION HIST(,2) 


1 . Updates the history /RDE tape on SYS009 (see note 1 ) 




2. Clears SYSREC. 


OPTION HIST, UPNEW 


1 . Updates the history/RDE tape on SYS009 (see note 1 ) 




2. Creates a new tape file on SYS009 




3. Clears SYSREC. 


OPTION EDIT 


1 . Edits and prints SYSREC onto SYSLST 


followed by 


2. Creates or updates the history/RDE tape on SYS009 


OPTION HIST, NEW 


(see note 1 ) 


or OPTION HIST 


3. Clears SYSREC. 


OPTION TES,NEW 


Creates a TES history tape on SYS007. 


OPTION TES 


Updates a TES history tape on SYS007. 


OPTION TES, NOTAPE, 


Edits and prints tape error data from SYSREC onto SYSLST. 


PRINT 


The data is printed in the detail tape unit format. 


OPTION TES,PRINT,NEW 


1 . Creates a TES history tape on SYS007 




2. Edits and prints tape error data from SYSREC onto 




SYSLST in the detail tape unit format. 


OPTION TES, PRINT 


1 . Updates the TES history tape on SYS007 




2. Edits and prints tape error data from SYSREC onto 




SYSLST in the detail tape unit format. 


OPTION TES, NOTAPE, 


Prints the summarized tape data from SYSREC onto 


SUM 


SYSLST in the detail tape unit format. 


OPTION TES, NOTAPE, 


1 . Edits and prints the tape error data from SYSREC onto 


PRINT, SUM 


SYSLST in the deteil tape unit format. 




2. Prints the summarization of the tape data from SYSREC 




onto SYSLST in the summarized tape unit format. 


OPTION TES, SUM, VOL 


1 . Updates the TES history tape on SYS007 




2. Summarizes the tape error data on SYSREC by 




volume serial number. 



Figure V-2. EREP Options (Part 1 of 2) 
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OPTION TES,PRINT, 
VOL 


1 . Updates the TES history tape on SYS007 

2. Edits and prints the tape error data from SYSREC 
onto SYSLST in the detail volume serial number 
format. 


OPTION TES,PRINT, 
SUM,SUMTAPE,VOL 


1 . Updates the TES history tape on SYS007. 

2. Edits and prints the tape error data from 
SYSREC onto SYSLST in the detail volume 
serial number format. 

3. Summarizes the tape error data on the history tape 
and prints it on SYSLST in the summarized volume 
serial number format. 


OPTION TES,NOTAPE, 
SUM,SUMTAPE 


Summarizes the tape error data on the history file and 
prints it on SY5LST in the summarized tape unit format. 


OPTION SELECT (see note 2) 


Selectively prints records from SYSREC onto SYSLST. 


OPTION SELECT,TAPE 
(see note 2) 


Selectively prints records from the history/RDE tape 
onto SYSLIST (see note 1). 


OPTION RDESUM 
(none) 


Summarizes the IPL, EOD, MCAR, CCH and Unit Check 
records for a specified period of from one to 30 days. 
These records are on the history/RDE tape (see note 3). 

Edits and prints SYSREC onto SYSLST. 


Notes: 

1 . RDE is only available if ERLOG = RDE is specified af generation time. 

2. Records ore selected by specifying select parameters. 

3. RDESUM does not summarize across multiple volumes. If EOF is encountered 
before the entire requested reporting period has been covered (this can be 
checked through the end data printed on the RDESUM listing), rerun RDESUM 
using the next volume history/RDE file and the same reporting period you 
specified during the first RDESUM execution. A listing with the reminder of the 
requested information is thus generated. 



Figure V-2. The EREP Options (Part 2 of 2) 



fEDIT 




CLEAR 




SUM — -- 


■ — GROUP 


HIST |{,NEW)(,2)| 
1 UPNEW J 










SELECT 




Udesum j 





(,NEW)r,PRINT(,SUM(,SUMTAPE))(,VOLl| 
|_,SUM(,SUMTAPE)(,VOL) J 

^OTAPE/.PRINTCSUMCSUMTAPE^VOLJI 
],SUM(,SUMTAPE)(,VOL) J 



The options for TES (Tape Error Statistics) 



DISK 
DISKETTE 
TAPE 

MICR/OCR 
GROUP= UNITREC 
TP 
CPU 
2715 
ALL 



x = the CPU volume serial 
number 
yyyy = the CPU model number. 



Figure V-3. Parameters for the SUM optior 
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SELECT PARAMETER 


RESULT 


CPU=xxxxxx 


All error records associated with a CPU may be selected 
for printing by entering the six digit CPU serial number. 


TYPE = 


"MCAR 
CCH 
IPL 
EOD 
TP 
UNIT 

.2715 . 




A specific type of error record may be selected for 
printing. Any number of different types, separated by 
commas, may be selected for each search. If 
TYPE=UNIT is selected, all error records except volume 
dismount records are handled. 


°^-ks yyMd ] 


All recordings made within a time span (measured in days) 
may be selected for printing. If two dates, separated by 
a comma, are specified, all recordings made in that time 
span are selected. If only one date is specified, all 
recordings made on that day are selected for printing. 


TIME hhmm,hhmm 


All recordings made within a time span (measured in 
hours and minutes) may be selected for printing. 


JOB=xxxxxxxx 


All recordings made during the execution of a specific 
job may be selected for printing by specifying the eight- 
byte jobname from the job statement. 


VOL=xxxxxx 


The error records for a specific volume may be selected for 
printing by entering the six-byte volume serial number. 


TERM=xxxxxxxx 


The error records for a terminal may be selected by entering 
the eight-byte terminal name. 


CUA=xxxx 


Records may be selected for printing by entering the channel 
and unit address (in hexadecimal) or the line number for 
TP.CUA=normalized address. 


DEVICE=xxxxxx 


The records associated with a specific type of device may be 

selected by entering the device type code (for example, 

1403,1442N1). 

To retrieve records associated with 3340 model 70 enter 

334A. To retrieve records associated with 3330 Model 11 

enter 3330B. 


FORMAT=TES 


Whenever a tape (2400 or 3400-series) error record is 
encountered, it is printed in the detail TES format by 
volume serial number. If FORMAT=TES is not specified, 
all tape error records are printed in the unit check format. 
All error records except volume dismount records are 
handled. 


("AREA ") 

SEL2715= i ADAPTER^ 

LSPECIALJ 


The 2715 records are printed in area station format if the 
SEL 2715 parameter is not specified. If printing by area, 
adapter, or special is required, however, the SEL2715 
parameter must be specified. 



Figure V-4 EREP Select Parameter 



DOSAS EREP (CONT'D 

BG 1100A READY FOR COMMUNICATION 

BG [ //EXEC EREP® | 

BG 3E11D ENTER OPTION SOURCE, C=CARD, S=CONSOLE, N=NONE 

BG | S(B)1 

BG 3E14A ENTER OPTION 

BG Option sum (?) 



Option clearUM 



EI 



© 



READY FOR COMMUNICATIONS 
= OPERATOR responses or command 

EOB 



Figure V-5 Example of Erep Options Using Syslog. 

Creating RDE/TES History Tapes 

History/RDE and TES history tapes are created and updated using EREP options 
HIST and TES. 

Entering options via SYSIPT: When entering the EREP options via SYSIPT, 
column 1 must be blank and only one option per card is allowed (for example, 
HIST with UPNEW or with NEW and/or 2 is considered one option). Each 
option may only be entered once for each execution of the EREP program. 

Example job streams for executing EREP: 
// JOB EXAMPLE1 
//TLBLEREPNEW 
// TLBL TAPEIN 
//ASSGN SYS007,XV:uu' 
//ASSGN SYS008,X'cuu' 
//ASSGN SYS009,X\:uu' 
// LBLTYP TAPE 
// EXEC EREP 
OPTION HIST,NEW 
OPTION TES, NEW 
A 
/& 

// JOB EXAMPLE2 
// TLBL TESUP 
// TLBL EREP UP 
//ASSGN SYS007,X*cuu' 
//ASSGN SYS008,X*cuu' 
//ASSGN SYS009,X'cuu' 
// LBLTYP TAPE 
// EXEC EREP 
OPTION EDIT 
OPTION TES 
OPTION HIST 
/* 
/& 
Figure V-6. Sample to Create History Tape 

EREPNEW end EREPUP must be the filenames for new history files or for updating. 
TAPEIN and TESUP must be the file name} for a new TES history tape or an update 
TES history tape. 

V-43 



MAINTAIN SYSTEM HISTORY UTILITY 



1.0 DESCRIPTION 



MSH utility is a program to select, deblock, and apply PTFs from a PTF file. 
The program creates a System History, simplifies installation and reduces the 
time required to remove a PTF, which proves to be ineffective or unstable. 
For this purpose the program provides backup records and automatically updates 
the PTF history which is kept in the system in form of a book in the source 
statement library. 

This program runs under control of DOS/VS Release 33 and upwards. This 
includes application in a cordless environment. The program requires a virtual 
partition of 64K Bytes. 



Selects PTFs from a PTF file as specified in select control 
statements (if the input file is blocked, deblocking is done 
automatically). 

Generates Job Control Statements to punch a backout PTF 
(statements which can be used to remove the PTF at a later 
time, if this should be necessary). 

Generates Job Control Statements to update the System 
History. 

Prints an index of a PTF file, or all Job Control Statements 
within a PTF file. 



The program can also be used for the installation of some Independent Distributed 
Components (IRs) and Program Products (PPs). The description of the control 
statements in this chapter includes the parameters needed to process such IRs 
and PPs. However, for information on how to use the program for IR and PP 
installation, refer to the individual IR or PP. 

FOR DETAILED INFORMATION, PLEASE REFER TO DOS/VS SYSTEM UTILITIES 
MANUAL GC33-5381-2. 



MAINTAIN SYSTEM HISTORY UTILITY (. . .Continued) 



FUNCTIONAL OVERVIEW 




//JOB PRINTPTF-INDEX 
// EXEC PTFHIST 
// UDS LST, INDEX 



// EXEC PTFHIST 

// UDS SEL, SINGLE(generate tackour PTF's) 



(intermediate output for 
JCL Statements and 
selected PTFs) 




Update System 
History Y.PTFSCP 
or Y.PTFPP 



(same device as previo 
SYSPCH) 



SYS001 Workfile 



Backout PTFs are 
written to SYS001 
for reapplicati 
required 



if 



MAINTAIN SYSTEM HISTORY UTILITY (■ . .Continued) 

2.0 SYSTEM HISTORY 

The system history is kept in the form of two books in the source statement 
library. 

The SCP History Y. PTFSCP . 

The Program Product History Y.PTFPP. 

The following table shows the history format: 

BKEND Y. PTFSCP 

PTFS AND LOCAL FIXES APPLIED TO DOS/VS REL NN.N 



CUSTOMER EVA CORPORATION 

ADDRESS 2 MAIN STREET, ANYWHERE 

PHONE NO 017-723-977 

SYSTEM PROGRAMMER TOM SMITH 

ENVIRONMENT 



TO ADD A NEW ENTRY USE FOLLOWING CONTROL STATEMENTS: 
// EXEC MAINT 

UPDATE Y. PTFSCP 

) ADD 0024 

NEW ENTRY 

)END 

/* 

/& 



IDENTIFIERS IN COLUMN ONE ARE AS FOLLOWS: 

P=PTF, A=APAR FIX, L=LOCAL FIX, ^INSTALLATION FIX, C=COMMENT 

B=BACKOUT PTF 



*0 1 7 

* 3 2 I 

B N04074 5745TAP 21/01/76 

B E05335 E05908 

B E.DTFMT 

N04089 574510X AR=NNN 21/01/76 

E04348 E04906 E05372 E05630 E05786 
C-SSBOPEN C-SSBOPEN0 C-$$BOPENl 
C-$$BOPEN 3 C-SSBOPIGN C-SSBOSD01 
N04074 5745TAP 19/01/76 

E05335 E05908 
E.DTFMT 



Eoch new entry in the history is inserted at the top of the history book, and the 
previous entries are shifted downwards. 



MAINTAIN SYSTEM HISTORY UTILITY 



The Identifier I has to be used as installation record for ICRs 
(Independent Component Release). The entry will be 
automatically at ICR installations or has to be done manually 
by the CE/1FE. 

Example : Power VS ICR Installation 

Col.1 12... 

I bN00000bbb5745PWRbRel=nn 

PWR ICR installed date 



2. 1 History Macro Description 

HIST REL = 'RELEASE', CUST = 'NAME' 

[, ADDR='ADDRESS] [, PHONE='NUMBER] 
^PROG^PROGRAMMERO ^ENV^NVIRONMENT'l 
[, SCPHIST=SYSTEM/PRIVATE] 
[, PPHIST=PRI VATE/SYSTEM] 



2.2 History Generation Example 

// Job MSH Installation 
// Option Deck 
// Exec Assembly 

Hist Rel= '33.0' 

Cust= 'EVA CORPORATION' 

Addr = '2 MAIN STREET, ANYWHERE' 

Phone= '017-723-977'. 

Prog= 'TOM SMITH', 

PPHIST=SYSTEM 

END 
/* 
/& 

SYSPCH output of the above assembly is a job stream to initializ 
history book and link the maintain system history utility. 



3.0 THE UPS CONTROL STATEMENT 

This statement has the format : 

//UDSSEL, [(ww,'xxxxxxxx',yy,zz) ] , [ SINGLE/MAS S/MASSB] 

// UDS identifies the statement as a IDS statement 

SEL requests the PTF select function 
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SINGLE 
MASS 
MASSB 
SUM 



These two operations describe the fixed part of the select 
argument, ww specifies the starting position of the fixed 
part of the argument within the statement in the PTF file, 
and xxxxxxxx is the character representation of the fixed 
part of the argument. 

The length of the fixed part may be 20 characters. Any 
apostrophes within the character string must be coded as 
double apostrophes . 

These two operands specify the starting and ending positions 
of the variable part of the argument within the statement 
in the PTF file. The contents of the field delimited by these 
positions are compared with the parameter "nnnnnn" in the 
select statements. The length of this variable part may be 
up to 8 characters . 



This parameter controls the BACKOUT-PTF creation and 
history updating. 

If SINGLE is specified, statements for a BACKOUT-PTF are 
generated for each selected PTF. The history is updated at 
the end of each PTF job. 

If MASS is specified, the creation of BACKOUT-PTFs is 
suppressed and the history entries are collected in a table. 
A history update job is generated at the end of the selection 
run or between two PTFs if the table becomes full. 

If MASSB is specified, statements for a BACKOUT-PTF are 
generated for each selected PTF. A history update job is 
generated ot the end of selection run or between two PTFs 
if the table becomes full. 



Name 



SUM is used only for IR and PP installation, 
used only for IR and PP installation. 



The specification of a UDS statement without parameters (// UDS SEL) results in 
the generation of the "Standard" default : 

//UDSSEL^V/yjOBN'^JS^SINGLE 
which is suitable for selection of PTF statements in the form: 

// JOB Nxxxxx 
where xxxxx is a five figure identification number. 



4.0 THE SELECT STATEMENT 



This statement has the following format : 



i [,C=kkkkkkk] 



The variable part of the select argument for the PTF to 
be selected. The length of this parameter must match the 
length implicitely specified by the parameters yy and zz 
in the UDS statement. 
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C=4<kkkkkk This parameter specifies the component which is affected by 
this PTF. This parameter is optional, but it is transferred to 
the history if it is specified. Its length must be seven bytes 
(for example, 5745UTL for component 5745-SC-UTL), and 
a parameter with an incorrect length is ignored. 

CL=SIP Used only for IR and PP Installation. 

RL=SIP 

SL=SIP 



5.0 THE COMMENT STATEMENT 

The comment statement is read in from SYSIPT and merged into the selected 
PTF. It is also treated as a JCL comment within the PTF jobstream. A comment 
may also appear within the PTF itself. A maximum of 20 comment statements 
can be processed for one PTF. The statement has the following format : 



[ttt...tt] 



An asterisk in column 1 followed by at least one blank 
identifies a comment statement. 

Identifies the PTF into which the comment is to be inserted. 

This parameter may be up to eight characters long. 

If this parameter is shorter than the PTF name, comparison with 

the PTF name is made only with the length of this parameter. 

The comment is inserted into the first PTF which matches these 

characters. 

Up to 60 text characters, seperated from the preceding 
parameter by one or more blanks. 



6.0 THE LIST FUNCTION (LST) 

The list function permits the user to print a PTF file index or all the job statements 
contained in a PTF file. 

LIST INDEX 



The list index function is requested with the statement : 

//UDS LST, INDEX 

The Control Statement is read from SYSIPT and the PTF File is read from SYS004, 
which may be a disk, a tape, or a diskette. The input record length may be 80 or 
81 bytes, or the records may be blocked into 3440-byte blocks. 

The output of the function is printed on SYS LST, and contains the following 
information : 

a) the control statement read, 

b the PTF names, their card counts, and the word "BACKOUT" . 

If this is a BACKOUT-PTF (BACKOUT-PTFs produced by previous PTF application 
runs may exist in the user environment). 
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LIST JCL STATEMENTS 

A list of all job control statements is requested with the statement : 

//UDS LST,JCL 

A list of all job control statements found in the file (including CATALR, 
CATALS, CATALP, INCLUDE, PHASE, COPYC, COPYR, and COPYS 
statements) is printed on SYSLST. 

SAMPLE JOBS USING THE LIST FUNCTION 



The following I/O device assignments are required for the LIST function : 

SYSIPT Control statement input 

SYSLST System output 

SYS004 PTF input file (filename = PTF) 

or 

SYSSLB IR or PP installation history input 

SAMPLE INDEX JOB 

// JOB PRINT PTF-INDEX 

//ASSGNSYS004, X'28T PTF -TAPE 

//EXEC PTF HIST 

// UDS LST, INDEX 

/* 

/& 

SAMPLE JCL LIST JOB 

// JOB PRINT JOB-CONTROL-CARDS 
//ASSGN SYS004,D!SK,VOL=DOS330 

//DLBLPTF, 

// EXTENT SYS004,DOS330 

// EXEC PTFHIST 

//UDS LST, JCL 

/* 

/& 

7.0 THE SELECT FUNCTION (SEL) 

Selection is controlled by a UDS control statement, which Is followed by the 
appropriate PTF selection statements. 

These may be in any order, but they must follow the UDS statement. Up to 
100 select statements may follow the UDS control statement. 



MAINTAIN SYSTEM HISTORY UTILITY (. . .ConHnued) 



The following I/O device assignments are required for running the select 
function. 



SYSLOG Accounting information input 

Message output 

SYSIPT UDS control statement 

PTF select statements (Filename IJSYSIN) 
Comment statements 

SYS004 PTF input (filename=PTF) 

Devices supported : card reader 
diskette 
tape 
DASD (2314,3330,3340, 3350) 

Record Length : 80,81 or 3340 bytes 

SYSSLB used only for IR and PP installation 

SYS001 Workfile (filename=IJSYS01) 

Devices supported : tape 

DASD (2314,3330, 3340, 3350) 

Note : This is required only if BACKOUT-PTFs 
are to be generated. 

SYSPCH Jobstream output (filename = IJSYSPH) 

SYSLST System output (filename = IJSYSLS) 

Notes: 



If the input is on a multi-file tape, the tope must first be positioned to the 
correct file. The MTC command may be used for this. 

User [ob accounting information is requested via SYSLOG at the start of the 
program. This information, which has a maximum length of 56 bytes is transferred 
to the JOB statement(s), starting at column 17. 

The system input is printed on SYSLST as it is read. During selection, the PTF ID 
is printed together with its card count (or "NOT FOUND" if the PTF could not be 
found). A summary at the end of the program shows how many PTFs were selected. 

To conclude processing, SYSPCH must be closed. The output on SYSPCH is in a 
form suitable for input via SYSIN for application of the PTFs to the system. 
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SAMPLE JOB USING SELECT FUNCTION 

//JOB SELECT 
//ASSGNSYS004, TAPE 
//ASSGN SYSPCH, TAPE 
// ASSGN SYSOOI, DISK,VOL=ll 1111 

//DLBLIJSYS01, 

// EXTENT SYSOOI 

// EXEC PTFHIST 

//UDSSEL, (I/Z/JOBN'^JS) 

04054, C=5745RMS 

04076 

/* 

//CLOSE SYS PCH,UA 

/& 

OUTPUT ON SYSPCH 



// JOB N04054*3 

// OPTION NOLOG 

// EXEC PTFREPRO 

*// JOB N04054*3 

** CA UT I O N THIS BACKOUT-PTF REMOVES THE APAR'S LISTED BELOW 



JCL For BACKOUT-PTF generatlo 



* * * N04054 3 * 

* APPLICABLE RE L.. 



PTF fetched from input tape 



RLD 

END 

/* 

// EXEC LNKEDT 

//ASSGN SYSS LB, UA 



JCL for history update step 



)END 

/* 

/& 
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3.0 JOB CONTROL EXAMPLE FOR A DISK OR DISKETTE ORIENTED SYSTEM 

// JOB SELECT PTF FOR' APPLICATION 
//DLBLIJSYSPH, .... Note 1 

//EXTENT SYSPCH,.... 
//ASSGN SYSPCH, X'cuu'OUTPUT PTF FOR APPL. 

//DLBLPTF Note 2 

// EXTENT SYS004 

//ASSGN SYS004,X , cuu" INPUT PTF 
//EXECPTFHIST 

- control statements for selection - 
/* 

CLOSE SYSPCH, UA 

/& 

// OPTION PARSTD 

//DLBLIJSYSIN Note 3 

//EXTENT SYSIN,.... 

- assgn (permanently) private libraries if desired - 

ASSGN SYSIN, X'cuu' SAME AS SYSPCH IN PREV.JOB 

- SYSIN-job stream will apply the PTF to the system - 



DLBL, EXTENT-cards are required (if not available, as STD LABEL) in case 
of SYSPCH to disk or diskette. For a single volume diskette file specify. 

//EXTENT SYSPCH. 

For a multi-volume diskette file code one EXTENT card per diskette volume. 

For example for a 3 volume diskette file : 

//DLBLIJSYSPH,.... 
//EXTENT SYSPCH 
// EXTENT SYSPCH 
// EXTENT SYSPCH 



The file ID in the DLBL card for SYSPCH on diskette should be DTTEPTF, i.e. 
//DLBLIJSYSPH, 'DTTEPTF'. 

In this case the SYSIN-Labels for diskette can be emitted, if they have been 
added correctly to the STDLABEL-Set or if IBM supplied STDLABEL are used 
(see SYSGEN-Bcok, GC33-5377). 



Same as in Note 1 for SYS004 instead of SYSPCH. Remember, the filename 
in the DLBL Card is PTF in this case. 
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Note 3 



Same as in Note 1 for SYSIN instead of SYSPCH. Remember, the filename 
in the DLBL card is IJSYSIN in this case. The DLBL and EXTENT information 
(same as for SYSPCH of previous job) has to be mode PARSTD which means 
that all existing PARSTD-Label for that partition will disappear. 

The Job Control Commands 

// OPTION PARSTD 
//DLBL IJSYSIN,.... 
//EXTENT SYSIN,.... 



can be omitted for input from diskette if they have been added correctly to 
the STDLABEL-Set (for cordless system) or if IBM supplied STDLABEL are used 
(see note 1). 

8.1 Job Control Examples 

If a BACKOUT PTF must be created during a select run, SYS001 is 
required as a workfile. 

DLBL-, EXTENT, -AND ASSIGN- statements for IJSYSOI can be 
omitted if a standard assignment exists and the label information is 
stored on the standard label cylinder. 

// JOB BACKOUT 

//ASSGNSYS001,X'16r 

// DLBL IJSYSOI, ■WORK', 70/00 1/SD 

// EXTENT SYS001 

//ASSGN SYSPCH, X'280' 
ASSGN SYSIN, UA 

ENTER FROM CONSOLE. . . 
ASSGN SYS004, X'OOC 
//EXECPTFHIST 

// CLOSE SYSPCH,X'00D BACKOUT PTF OUTPUT 
ASSGN SYSIN,X'280' 

/ & 

EXAMPLE FOR CARD INCORPORATION. THE PTF IS READ BY THE 
CARD READER, STORED ON DISK AND THE JOBSTREAM IS PUNCHED 
ON TAPE. THE ENTIRE INPUT IS PROCESSED BECAUSE SELECT CARDS 
ARE MISSING. 
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// JOB MASS APPLICATION 

//DLBLIJSYSPCH, 

// EXTENT SYSPCH, 

//ASSGNSYS004,X'I62' 

//DLBLPTF, 

// EXTENT SYS004, . . 

//ASSGN SYSPCH, X'162' 

// EXEC PTFHIST 

// UCS SEL, 1 , '// JOB N',9, 13,MASS 

52511 

53008 

59084 

53016 

* 'N52511' APAR E52784 NOT FIXED 

* 'N53008A3' C=5745IOX 

* 'N59084' C=6745 PWR FIX FOR APAR E55186 INCLUDED 
/* 

// CLOSESYSPCH.UA 

/& 

//DLBLIJSYSIN 

// EXTENT 

ASSGN SYSIN,X'162' 

MASS APPLICATION OF PTFs N52511, N53008, N53016, AND 
N 59084. FOR MASS APPLICATION, GENERATION OF BACKOUT 
PTF IS SUPPRESSED, THEREFORE WORKFILE SYS001 IS NOT 
REQUIRED. ADDITIONAL INFORMATION IS SUPPLIED FOR 
THREE DIFFERENT PTFs. 



// JOB BACKOUT PTF 

//ASSGN SYS001,X'280* 

//ASSGN SYSPCHfX'ffll' 

//ASSGN SYSO04,X'282' 

//EXEC PTFHIST 

// UDS SEL, 1 , '// JOB N",9, 13 

59021 C=5745PWR 

59035 

* 'N 59035' C=5745PWR LOCAL FIX INCLUDED 

/* 

//MTCWTM, SYSPCH 

// MTC REW, SYSPCH 

/& 

//ASSGN SYSPCH,TAPE BACKOUT PTF OUTPUT 

ASSGN SYSIN,X'28r 

EXAMPLE FOR A TAPE ORIENTED SYSTEM. 

PTFs 59021 AND 59035 ARE SELECTED AND A COMMENT FOR 

PTF 59035 IS SUPPLIED. 
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REAPPLICATION OF BACKOUT PTFs 



For re-application of a BACKOUT PTF the BACKOUT PTFFile is processed in the 
same manner as the normal PTF -File by using the UDS and the select statements. 



LIST SYSTEM HISTORY (HISTLIST) 

1 .0 Description 

The List System History utility can be executed in any real or virtual 
partition. The storage requirements depend on the number of entries in 
the history book to be processed, because the program requires sufficient 
space for the complete history book and additional working storage. The 
minimum virtual partition size of 64K is sufficient for processing a book 
with approximately 1200 entries. If the book to be processed is larger, 
the partition size will have to be increased accordingly. 

The List System History utility produces its output in three ports: the 
book list, the cross-reference lists, and the lost APAR and error report. 
The program allows you to request specific parts of the output as well as 
the complete output (see the section Program Execution) 



1.1 Functions 

To provide a complete printout of either of the history books 
Y.PTFSCP and Y.PTFPP, which are generated and maintained 
by the utility program Maintain System History (PTFHIST), or 
of any other history book with the same format. 

To provide edited and sorted cross-reference lists of APARs, 
local fixes, PTFs, and affected library members, with pointers 
to the entries in the book printout. 

To provide an edited list of lost APARs and an error report. 



For detailed information, please refer to DOS/VS System Utilities 
Manual GG33-5381 . 



LIST SYSTEM HISTORY (HISTLIST) (CONT'D) 



2.0 BOOK LIST 



The BOOK LIST is a complete listing of the selected HISTORY BOOK with 

its entries in the original sequence. 

The following table shows the history format: 



PTF'S AND LOCAL FIXES APPLIED TO DOSAS REL 32.0 00000000 
00000001 

CUSTOMER EVA CORPORATION 00000002 

ADDRESS 2 MAIN STREET, ANYWHERE 00000003 

PHONE NO 017-723-977 00000004 

SYSTEM PROGRAMMER TOM SMITH 00000005 

ENVIRONMENT 00000006 

00000007 

TO ADD A NEW ENTRY USE FOLLOWING 

CONTROL STATEMENTS: 00000008 

// EXEC MAINT 00000009 

UPDATE Y.PTFSCP 00000010 

) ADD 0024 00000011 

NEW ENTRY 00000012 

) END 00000013 

/* 00000014 

/& 00000015 

00000016 
00000017 
00000018 
00000019 
00000020 
00000021 
00000022 
7 00000023 

1 00000024 

BN10099:! 5745PDA AR=320 09/22/76 00000025 

B E10001 00000026 

B B-IJBDMPGN 00000027 

P N10084:B 5745BTMAR=310,320SUP=N10083,N10081,N10080 

PRE=N 10261, * 00000028 

N10158 09/27/76 00000029 

E06010 E06061 E06062 E06082 E06087 E06102 E061 10 E061 14 00000030 

E06132E07210E07211 E07212E07217E07218E07219E07220 00000031 

E07221 00000032 

E.BTMODIH2 E.BTCSE E.BTBTFIX E.DTFBT C-$$ABERP5 
C-SSABERP6 00000033 

C-SSABERP7 C-$$ABERP8 C-$$BCTC01 C$$BOTC02 00000034 

PN 10099:1 5745PDA AR=320 09/22/76 00000035 

E10001 00000036 

R-LJBDMPGN 00000037 

? Nil 190:3 5745UTL AR=330 09/22/76 00000038 

El 1313 00000039 

Z.FASTCOPY 00000040 

5745SUP *** FT TRACE INSTALLED *** 09/22/76 00000041 

E.SGDFCH 00000042 



IDENTIFIERS IN COLUMN ONE ARE AS FOLLOWS: 
P=PTF, A=APAR FIX, L=LOCAL FIX, ^INSTALLATION FIX, 
C=COMMENT, B=BACKOUT PTF 



LIST SYSTEM HISTORY (HISTUST) (CONT'D) 



CROSS-REFERENCE LISTS 



This part of the output is produced when you specify the XREF function 
If is also produced for book Y.PTFSCP when the program is executed 
without console communication. 

Fix/PTF Cross-Reference 

This is a cross-reference list of all APAR fixes, local fixes, and PTFs 
installed on the system. The list has four columns with the following 



Installed APAR, local fix, or PTF. APARs and PTFs are identified 
by APAR and PTF numbers, respectively. A local fix is identified 
by its entry sequence number. 

COMP 

Component identifier of the APAR fix or PTF. 

LAST INST. DATE 

Last installation date of the APAR fix or PTF. 

ENTRIES 

The sequence numbers of the corresponding history book entries, 

as an aid to finding these entries in the first part of the program 

output. 

APAR Cross-Reference 



This is a sorted list of all installed APARs. The list has four columns with 
the following meanings: 

APAR 

The numbers of all APARs for which PTFs or APAR fixes are 

installed. 

COMP 

The component identifier of the affected component. 

LAST FIX 

Either the number of the last PTF containing the APAR or the 

indication W-FIX^or APAR fix. 

ENTRIES 

The sequence numbers of the corresponding history book entries 

as an aid to finding these entries in the first part of the output. 



LIST SYSTEM HISTORY (HISTLIST) (CONT'D) 

3.0. CROSS-REFERENCE LISTS 

Module Cross Reference 

A sorted list of all affected library members. The list is produced for the 
XREF function and has four columns with the following meanings: 

MODULE 

The names of all library members affected by APAR fixes, local 
fixes, of PTFs. Names of phases are identified by the prefix *C-'. 
Names of modules have the prefix *R-', for names of books the 
sublibrary identifier is used (for example, E.PIOCS). 

COMP 

The identifier of the affected component. 

LASTCHNG. DATE 

The date of the last change installed by means of a fix or PTF. 

FIXES 

This column contains one of the following: 

- The PTF number 

- If no PTF is installed, the APAR number of the fix 

- If the fix has no APAR number, the sequence number 
of the history book entry. 

The following sample shows the format of the three cross-reference lists. 



LIST SYSTEM HISTORY (HISTLIST) (CONT'D) 
3.0 CROSS-REFERENCE LISTS 

CROSS REFERENCE OF ALL INSTALLED PTF'S 





LAST 




FIX COMP 


J_NST.pATE_ 
08/13/76 


ENTRY SEC 


E0601 1 5745BTM 


0059 


E07220 5745BTM 


09/22/76 


0043 


* INST. FIXES W/O APAR NO. 


* 


0041 


* LOCAL FIXES W/O APAR NO. 




0061 0062 


N 10081 :A 5745BTM 


09/22/76 


S0050 


N 10083 -3 5745BTM 




S0045 


N10084:B 5745BTM 


09/27/76 


0028 


N 10099:1 5745PDA 


09/22/76 


B0025 B0035 


N 10158:2 5745SUP 


09/22/76 


0054 


Nil 190:3 5745UTL 


09/22/76 


0038 



TOTAL FIX COUNT 00010 

A 'BIN FRONT OF A SEQUENCE NUMBER INDICATES A BACKOUT PTF. 
A ^'INDICATES THIS PTF HAS BEEN SUPERSEDED. 

CROSS REFERENCE OF ALL APAR NUMBERS *** 



_APAR 


COMP 


LAST FIX 


__ENT_RY_SEQjJ 


E06010 


5745BTM 


N10084:B 


0030 


S0046 


E060U 


5745BTM 


A-FIX 


0059 




E06061 


5745BTM 


N 10084 :B 


0030 


S0046 


E06062 


' 5745BTM 


N10084-.B 


0030 


S0046 


E06082 


5745BTM 


N10084:B 


0030 


S0046 


E06087 


5745BTM 


N10084* 


0030 


S0046 


E06102 


5745BTM 


N10084:B 


0030 


S0046 


E06110 


5745BTM 


N10084:B 


0030 


S0046 


E06114 


5745BTM 


N10084£ 


0030 


S0046 


E06132 


5745BTM 


N10084:B 


0031 


S0047 


E07210 


5745BTM 


N10084£ 


0031 


S0047 


E07211 


5745BTM 


N10084S 


0031 


S0047 


E07212 


5745BTM 


N10084:B 


0031 


S0047 


E07217 


5745BTM 


N10084fi 


0031 


S0047 


E07218 


5745BTM 


N10084£ 


0031 


S0047 


E07219 


5745BTM 


N10084:B 


0031 




E07220 


5745BTM 


N10084:B 


0031 


0043 


E07221 


5745BTM 


N100845 


0032 




E09050 


5745SUP 


N10158-.2 


0057 




E09171 


5745SUP 


N10158:2 


0057 




E09172 


5745SUP 


N10158:2 


0057 




E10001 


5745PDA 


N 10099:1 


B0026 


B0036 


E10123 


5745SUP 


N10158:2 


0057 




E10134 


5745SUP 


N10158:2 


0057 




E10155 


5745SUP 


N10158:2 


0057 




E10159 


5745SUP 


N10158:2 


0057 




E10161 


5745SUP 


N10158:2 


0057 




E10165 


5745SUP 


N10158-2 


0058 




El 01 70 


5745SUP 


N101582 


0058 




El 1313 


5745UTL 


N11190:3 


0039 





TOTAL FIX COUNT 0030 

A *B- IN FRONT OF A SEQUENCE NUMBER INDICATES A BACKOUT PTF. 
A *S* INDICATES THIS PTF HAS BEEN SUPERSEDED. 
V-61 



LIST SYSTEM HISTORY (HISTLIST) (CONFD) 



CROSS-REFERENCE LISTS 



CROSS REFERENCE OF ALL CHANGED MODULES 







LAST 






MODULE 


COMP 


CHNG.DATE 


FIXES OR ENTRY SEQUENCE NO'S 


C-$$ABERP5 


5745BTM 


09/27/76 


N10084:B 


N 10083:3 


C-$$ABERP6 


5745BTM 


09/27/76 


N10084:B 


N 10083:3 


C-$$ABERP7 


5745BTM 


09/27/76 


N10084:B 


N10083:3 


C-$$ABERP8 


5745BTM 


09/27/76 


N10084:B 


N10083:3 


C-$$ABERP9 


5745BTM 


09/22/76 


N 10081 :A 




C-$$BCTC01 


5745BTM 


09/27/76 


N10084:B 


N 10083:3 N 10081 :A 


C-$$BOTC02 


5745BTM 


09/27/76 


N10084:B 




E. ALLOC 


5745SUP 


09/22/76 


N10158:2 




E.ALLOCR 


5745SUP 


09/22/76 


N101585 




E.BTBTFIX 


5745BTM 


09/27/76 


N10084:B 


N 10083:3 


B.BTCSE 


5745BTM 


09/27/76 


N10084-.B 


N10083:3 


E.BTMOD 


5745BTM 


09/22/76 


N10081:A 




E.BTMODIH2 


5745BTM 


09/27/76 


N10084:B 


N10083:3 N10081:A 


E.BTNCKID 


5745BTM 


09/22/76 


N10081:A 




E.BTOMLOA 


5745BTM 


09/22/76 


N10081:A 




E.DTFBT 


5745BTM 


09/22/76 


N10084:B 


E07220 N 10083:3 N10081:A 
E06011 


E.DVCGEN 


5745SUP 


09/22/76 


N10158:2 




E.FOPT 


5745SUP 


09/22/76 


N10158:2 




E.TOINTER 


5745SUP 


09/22/76 


N10158-2 




E.SGCCWT 


5745SUP 


09/22/76 


N10158:2 




E.SGDFCH 


5745SUP 


09/22/76 


"0042** 




E.SGEND 


5745SUP 


09/22/76 


N101585 




E.SGMAIN 


5745SUP 


09/22/76 


N10158:2 




E.SGSUP 


5745SUP 


09/22/76 


N10158:2 




R-UL03Z 


5745BTM 


09/22/76 


N 10081 A 





Z.FASTCOPY 5745UTL 09/22/76 Nil 190:3 

TOTAL COUNT OF CHANGED MODULES 00026 



LOST APAR and ERROR REPORT 

This report provides a summary of all PTFs for which one of the following 
conditions was detected: 

Incorrect syntax or format , 
Prerequisite PTF(s) missing. 

It also provides a list of lost APARs. These are APAR or local fixes which 
were lost due to installation of PTFs. 

This part of the output is produced when you specify the CHECK funetion. 
It is also produced for book Y.PTFSCP when the program is executed without 
console communication. 



The following sample shows the format of this report. 



LIST SYSTEM HISTORY (HISTLIST) (CONT'D) 



4.0 


LOST APAR and ERROR REPORT 








* LOST APAR AND ERROR REPORT " 












PHASE 


REFERENCED ENTRY OF 




PTF 


COMP 
5745BTM 


DATE 
09/27/76 


MODULE 


LOCAL-FIX OR APAR DATE 
•"THIS PTF HAS NO 


SEQ.N 


N10084* 












PREREQUSITE 












PTF N 10262 INSTALLED 


0028 








E.DTFBT 


AE06011 5745BTM 

LOOP IN BTBTFIX OE/13/76 


0059 








E.DTfBT 


L 5745BTM CICS 

ABEND 
WITH PROGRAM CHECK 0Q/13/7& 


0061 








E.DTFBT 


L BTBTFIX 


0062 


NII190J 


5745 UTL 


09/22/76 




—THIS PTF IS NOT 
APPLICABLE 
TO THE INSTALLED 
RELEASE 


0033 


NIOOSI* 


5745BTM 


09/22/76 




'"SYNTAX ERROR ON PTF, 
ENTRIES BYPASSED 


0050 



NOTE: LOCAL AND INSTALLATION FIXES OR ENTRIES WITH PRE APAR 

NO'S WILL BE DISPLAYED IF THE APAR NO. IS MISSING. 
*** SYNTAX ERRORS FOUND ON ENTRIES 0051 0053 0061 0062 



JOB CONTROL STATEMENTS 

The HITLIST utility runs in a botch partition of an operational DOS/VS 
system and is controlled by the following job control statements: 

// JOB jobname Required. 

//UPSI 



Optional. 
Indicates that c 
desired. 



nsole communication is 



01 Optional. 

Suppresses listing of the history book. 

//ASSGN SYSSLB,X-cuu' 

Required if the requested book is stored ii 
a private source statement library. 



// EXEC HISTLIST 



Required. 



Note: It is assumed that SYSLOG, SYSLST, and 
SYSRES are already asigned. 



INDEX 

/+ statement 11-20 

/* statement 11-20 

/& statement 11-20 

* statement 11-20 



Abnormal termination option table IV-72 

ACTION statement 11-22, 11-23 

ADD command 11-01, 11-02 

Address, converting virtual to real IV- 94 

ALLOC 

command 11-05 

macro, supervisor II -52 
ALLOCR 

command 11-05 

macro, supervisor 11-52 
ALTER command 11-05 
Anchor table IV- 99 

ASCII/EBCDIC translation table IV-77 to IV-81 
ASSGN 

command 11-05 to 11-08 

macro, supervisor 11-55 

statement 11-05 to 11-08 
Attention routine commands 11-05 to 11-19 



Boundary box IV - 93 

C 

CANCEL command 11-08 

Cancel codes and messages IV-56, IV-57 

CAT command 11-02 

Catalog 

core image library 11-24 

procedure library 11-24 

relocate library 11-24 

source statement library 11-24 
CAW (channel address word) 1-19 
CCB (command control block) IV-06 to IV-09 
CCW (channel command word) 1-19 
Channel address word (see CAW) 
Channel bucket IV-44 
Channel commands 1-22 to 1-24 
Channe I command word (see CCW) 
Channel control table IV-46 
Channel logout, limited 1-20 
Channel queue table IV-43 
Channel status word (see CSW) 
CLOSE 

command 11-08 

statement 11-08 
Code translation table 1-08 to 1-13 



INDEX (continued) 

C (continued) 

Command control block (see CCB) 
Communication region 

partition IV-17 to IV-25 

system (SYSCOM) IV-12 to IV- 16 
Condense 

core image library 11-25 

procedure library 11-25 

relocate library 11-25 

source statement library 11-25 
Condense limit, automatic 11-25 
Condition codes 1-06, 1-07 
CONFG macro, supervisor 11-42, 11-43 
Console buffering table IV-48 
Control registers 

allocation 1-14 

assignment of fields 1-14, 1-15 

GPR masks, CR9 V-16 
Conversion 

hexadecimal to decimal 1-25 

virtual to real address IV- 94 
Copy blocks 

overview IV- 89 

CCB, layout of IV- 90 

CCW, layout of IV- 91 
Copy functions, librarian 11-28 to 11-35 
CORGZ program, functions 11-28 to 11-35 
Doss partition ECB (XECB) table IV-45 
CRT constant table IV-65 
CSERV program, functions 11-27 
CSW (channel status word) 1-19 



Oasd standard labels 

format 1, file 111-07 to 111-10 

format 2, file 111-11 to 111-14 

format 3, file 111-15 

format 4, file 111-16 to 111-18 

format 5, file 111-19 

volume 111-01 
DATE statement 11-09 
Deblock utility 

description 11-63 to 11-68 

examples 11-66, 11-67 
DEL command 11-02 
Delete 

core image library 11-24 

procedure library 11-24 

relocatable library 11-24 

source statement library 11-24 
Density data IV- 1 1 
Device type codes M-57 to 11-58 
DIB (disic information block) IV-51, IV-52 
DIDAL 

block IV -92 

entry IV -92 
Directory entry, layout of IV- 102 
Directory rearch sequences IV - 1 04 
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Directory versus second level directory relationship IV- 103 

Disk information block (see DIB) 

DLAB statement 11-09 

D LB L statement 11-09 

DOSVSDMP 

creating stand-alone dump program V-25 

executing stand-alone dump program V-26 

printing stand-alone dump output V-26, V-27 
DPD 

command 11-02, 11-03 

macro, supervisor 11-55 
DPDTAB (page data set table) IV-50 
DSERV program, dunctions 11-26, 11-27 
DSPLY command 11-10 
DTF table type codes 111-108,111-109 
DTFCD 

combined reader/punch 111-34 

punch 111-32,111-33 

reader 111-28, 111-31 
DTFCN 111-37 
DTFCP 

DISK=NO 111-104,111-105 

DISK=parameter omitted III -106, III -107 

DISK=YES Ill-lOlto 111-103 
DTFDA 111-62 to III -66 
DTFDI 111-99,111-100 
DTFDR 111-38 
DTFDU 111-91, 111-92 
DTF IS 

add 111-71 to 111-76 

addrtr 111-85 to 111-90 

load 111-67 to III -70 

retrve, random 111-77 to 111-80 

retrve, sequential 111-81 to III -84 
DTFMR 111-41 to 111-43 
DTFMT 

data files 111-44 to 111-51 

work files ,111-52 
DTFOR 111-39 to 111-40 
DTFPH 

DAM-files 111-96 

diskette 111-97, 111-98 

magnetic tape 111-93 

sequential disk 111-94, 111-95 
DTFPR 111-35, 111-36 
DTFSD 

data files 111-53 to 111-59 

work files. 111-60 111-61 
DUMP command 11-10 
DUMPGEN 

options V-20, V-21 

control statements V-21, V-22 

messages V-22 

stand-alone dump program V-23, V-24 
DVCDN command 11-10 
DVCGEN macro, supervisor 11-53, 11-54 
DVCUP command 11-10 
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ECB (event control block) 
END 

card, format 11-60 

command 11-10 
ENDSD command 11-10 
ENTER command 11-10 
ENTRY statement 11-22 
EREP V-36 

ERPIB (error recovery procedure information block) IV-54 
Error recovery block (ERBLOC) IV-55 
Error recovery procedure information block (see ERPIB) 
Error queue entry IV-55 
ESD card, format 11-60 
ESERV program 

control statements 11-36, 11-37 

examples 11-38 
Event control block (see ECB) 
EXEC command 11-11 
EXTENT 

command 11-11 

statement 11-11 



Fetch table IV-102 

File labels, standard 

dasd (see dasd standard labels) 
tape (see tape standard labels) 

FOPT macro, supervisor II -42 to 11-50 



Headqueue PUB table IV-40 
HOLD command 11-11 
HISTLIST V-57 

I 

IGNORE command 11-11 
INCLUDE statement 11-21, 11-22 
Instruction code 

assembler 1-05 

extended mnemonic 1-04 

format 1-13 

machine 1-01 to 1-04 
Interruption code 

external 1-21 

input/output (I/O) 1-22 

machine check 1-20, 1-21 

program 1-21 

supervisor call 1-22 
Interval timer option table IV-68 
Interval timer request table IV-70 
lOTAB macro, supervisor 11-52, li-53 
I/O tables interrelationship IV-35 
IPL control statements 11-01 to 11-04 
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JIB (job information block) IV-41, IV-42 

Job accounting interface common table IV-74, IV-75 

Job accounting interface partition table IV-76, IV-77 

Job control statements/commands H-05 to 11-20 

Job information block (see JIB) 

JOB statement 11-12 



Label information cylinder 111-20 
Labels, standard 

dasd (see dasd standard labels) 

tape (see tape standard labels) 
LB LTYP statement 11-12 
LFCB command 11-12 
Librarian 

maintenance function 11-24 to 11-26 

service functions 11-26 to 11-28 

copy functions 11-28 to 11-34 
LIK (logical transient owner identification key) IV-26 
Line mode table IV-49 

Linkage editor control statements 11-21 to 11-23 
LIOCS module-names versus options 

CDMOD 111-21, 111-22 

DAMOD 111-22 

DIMOD 111-22 

DRMOD 111-22 

DUMOD 111-22 

ISMOD 111-27 

MRMOD 111-23 

MTMOD 111-23 

ORMOD 111-24 

PRMOD 111-24, 111-25 

PTMOD 111-26 

SDMOD 111-26, 111-27 
LISTIO 

command 11-12 

statement 11-12 
LIST SYSTEM HISTORY V-57 
LOG command 11-12 
Logical transient key (see LTK) 

Logical transient owner identification key (see LIK) 
Logical unit block (see LUB) 
LSERV program 11-39, 11-40 
LTK (logical transient key) IV-26 
LUB (logical unit block) IV-36 
LUCB command 11-12 

Maintain System History utility (see MSH) 
MAINT program, functions 11-24 to 11-25 
MAP command 11-12 
Merge function, librarian 11-32 to 11-35 
MICR DTF addresses and pointers IV-53 
MODE command 11-12, 11-13 
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Module names (see LIOCS module names versus options) 

MSG command 11-13 

MSH (Maintain System History utility) V-44 

MTC 

command 11-13 

statement 11-13 
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NEWVOL command 11-13 
NOLOG command 11-13 



OLTEP 

requirements V-31 — 

options V-32, V-33 

example V-34 
Operator communication option table IV-67 
OPTION statement 11-13 to 11-16 
Option tables 

AB (abnormal termination) IV-72 

IT (interval timer) IV-68 

OC (operator communication) IV-67 

PC (program check) IV-66 

PHO (page fault handling overlap) IV-73 

TT (task timer) IV-69 
OVEND 

command 11-16 

statement 11-16 



Page data set format 

2314 IV-96 

3330 IV-95 

3350 IV-96 
Page data set table (see DPDTAB) 
Page fault handling option table IV-73 
Page frame table IV- 84 
Page queue table IV-83 
Page table IV-83 
PAGETAB 1V-85 

Partition identification key (see PIK) 
Partition communication region IV- 18 to IV-25 
PAUSE 

command 11-16 

statement 11-16 
PDA ID program 
functions 

I/O trace V-02, V-03 

F/L trace V-03, V-04 

GSVC trace V-04 

QTAM trace V-05 
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PDAID program (continued) 
functions (continued) 
VTAM trace V-06 
VTAM BUFFER pool trace V-07 
TD (transient dump) V-08 
initialization V-01 
system generation requirements V-01 
termination V-02 

utility program, tape to printer V-08 
PDZAP 

system requirements V-28 
executing PDZAP V-28, V-29, V-30 
PHASE statement 11-21 
Physical unit block (see PUB) 
Physical unit block ownership table IV-39 
PIB (program information block) IV-29 to IV-32 
PIK (partition identification key) IV-26 
PlOCS macro, supervisor 11-50, 11-51 
Program check option table IV-66 
Program information block (see PIB) 
Program information block extension IV-33 
Program status word (see PSW) 
PRTY command 11-15 
PSERV program, functions 11-27, 11-28 
PSW 1-18 

PUB (physical unit block) IV-37, IV-38 
PUB2 table 

accessing the IV-58 
entry formats 
dasd IV-59 
tape IV-60, IV-61 

unit record and unsupported devices IV-59 
3540 diskette IV-62 
3886 OCR IV-61 



Queue headers, selection pool IV-87 
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RAS linkage area IV-27 

RCB (resource control block) IV-10 

Reallocation function, librarian 11-25, 11-26 

Recorder file table (see RF-table) 

Rename 

core image library 11-24 

procedure library 11-25 

relocatable library 11-25 

source statement library 11-25 
REP card, format 11-61, 11-62 
REPLICA block IV-92 
RESET 

command 11-16 

statement 11-16 
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Resource control block (see RCB) 

Resource usage record table (see RURTAB) 

RF-table (recorder file fable) IV-63, IV-64 

RID IV- 106 

RLD card, format 11-60, 11-61 

ROD command 11-16 

Routine identifiers (see RID) 

RPS 

DTF/module relrtionship 111-110 

DTF extent ion layout II I -111 
RSERV program, functions 11-26, 11-27, 11-28 
RSTRT statement 11-16 
RURTAB (resource usage record table) IV-98 IV-97, IV-S 



SAB (seek oddress block) IV-50 
Save area 

problem program IV-34 

user IV-34 
SDAID program 

changing parameters V-15 

functions 

dedicated events V-10 
elementary events V-09 

initialization V-12 to V-14 

output 

dedicated events V-10 
elementary events V-H 

requirements V-09 

restrictions V-09 

termination V-16 
Second level directory 

directory relationship IV-102 

format IV-102 
Seek address block (see SAB) 
Segment table IV- 82 
Selection pool identifiers IV-86 
SEND macro, supervisor 11-55 
Sense bytes 
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Service functions 


librarian 11-26 to 11-28 



SET 

ipl command 11-03, 11-04 

job control command 11-16, 11-17 
Shared virtual area (see SVA) 
SSERV program, functions 11-26, 11-27, 11-28 
START command 11-17 
STDJC macro, supervisor 11-41,11-42 
STOP command 11-17 
Storage assignment, permanent 1-16, 1-17 
Supervisor call codes IV-02 to IV-05 
Supervisor macro's 11-41 to 11-53 
Supervisor storage allocation IV-01 
SUPVR macro, supervisor 11-41, 11-42 
SVA (shared virtual area), layout of IV- 100 
SYSCOM (system communication region) IV-12 to IV-16 
System task blocks IV-28 

System maintenance and generation, Overview of programs for DOS/VS 11-66 
SYSVISDump V-17 



Tape error block (see TEB) 

Tape standard labels 

file (ASCII) 111-05, 111-06 
file (EBCDIC) 111-03, 111-04 
volume (ASCII) 111-02 
volume (EBCDIC) 111-01 

Task interrupt key (see TIK) 

Task timer option table IV-69 
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TCB (translation control block) IV-87, IV-t 

TEB (tape error block) IV-48 

TIK (task interrupt key) IV-26 

TIB L statement 11-17, 11-18 

TPBAL command 11-18 

TPLAB statement 11-18 

Track hold table IV-47 

Translation control block (see TCB) 

TXT card, format 11-60 



UCS command 11-18 

UNPATCH command 11-18 

Update, source statement library 11-25 

UPS I statement 11-18 



Virtual to real address, conversion IV- 94 

VOL statement 11-18 

Volume labels, standard 

dasd (see dasd standard labels) 
tape (see tape standard labels) 

VSTAB macro, supervisor 11-51 

VTAM address vector table IV- 105 
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XECB table IV-45 

XTENT statement 11-19 
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ZONE statement 11-20 
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